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llyenkor nyarvAgAn *ok tij tag jo 
van « szfimftogApasek teborAnak* 
A turistautakr6l hazatArok 
caomeg;Aban nem rltkasAg ft 
*iamit6g£p. Wfegszeporodnek 
ilyenkor a hozzenk Arkezfi level ak, 
nmelvekbsn kezdok k^rnek 
mindenfAle tenAcsot. £pp ezArt 
ugy gondottuk sokan orulnek 
majd, ha e tvavj lepszAmunkban 
megprdbAljuk kicsit trA1A»n> 
kicsit ko mo I yen dsszefoglalnj a 
kezdtik 13+1 pa ran cso I at At. Ime: 
i, Ne vegyunk olyan gApat, 
emelyre az AgvilAgon semmif Ale 
azoftvert sem Jebet ifthon kaprol 
Z Ha mAr megv*ttunk agy Hyac^ 
go pet: f 

a) ad junk rajta tul n mil von 
gyorsan osak lehat 
bj hirdessunk az Grazes 
tehats&ges helyan. hogy 
caaratarsakat ke re stink. 

3, M ial ott bek a pc so I n £ nfc a g a" p at 
olvesauk el a kezelesi utasltist, 
tAj^kozodjunk a legkozelebbi 
szervlz helyAral es nyitvatarta- 
aArol. vaiamlnt merjuk fel. bogy 
mi I yen mddon tudjuk 
leggyorsabban ArtesTteni a 
tuzolttikat. 

4. HamAg**m,,sz6lal " meg a gop, 
ezaz nines kep a monitor on: 
ft) ezonnal huzzuk ki a hAldzati caatlakozAt 

b) ba a kezel&si iitmutat6 tijabb AttanulmAnyozAsa «m seglt, 
ekkor forditsuk figyelmilnket ft i*vA osatorna beal11t6jara I 
A M4el6tt agy normal kazettas magndt kapcsolnAnfc ft ga>- 
hai, gyozSdjunk meg a 1efrAsb6L bogy valdban bArmllyen 
magnb caatlako*tathat6-e hozza. 

5* MArJuk feU bogy milyen tAroldegysAgOnk van As mm van 
p program am It szerazttink a gApbez. T6i"6djunk bale, bogy 
■ kftzattftt a floppy drive- be, illetve a lemezt a mag no" be nem 
lehal barakm. Hft a mflvelet magla aikerulna, vagyuk olfi a ]a- 
ultAshoz a dugipAnzOnketl 

7. Ha m6d van r A. akkor el*6kAnt n* olyan programot tflrtaunk 
be. emelyhaz hasznalati utesStAsunk la mag nyelvtudAsunk Is 




hlanyzik, mart « I 
bizto* kudarcAlmAny* 
8. Hi van gyerekunk* akkor « 
el so hiten tart&uk tAvol ft 
g<§ pttil, k 51 on ben mi nem f Arunk 
hozzA. Legjobb ha Ajjel ft gyerek 
alalvasa utin vasszuk elfi 

a gepat a reitekhelyAro'l. 1 
9. A gap also 1 bakapcsolaaa 
elfltt ertesftsuk a felasAgunket r 
barAtndnkat, a set I eg fAf junket, 
bardtunkal, hogy n Ah Any hetra 
aluta^unk valami tavoli tafefon 
as poata netkvli halytsAgba. 
(Mondjuk egy ismeretlan 
afrikei fakjba. J 
tO, A BASIC programozAs 
atapjait n« a gAphaz ftdott 
kdnyvb6l akarjuk maglanulnt. 
mart M ^ttal A ban ftlkalmatlftn 
ftrra a calra. Javasoljuk az 
ovedisoknak 8x616 kdnyvekei P 
UM nfiha mag azok la tOfsigosan 
magasak. 

ft. Ha nam artjtik a kiinyvet, 
amelybfll tanulunk. rift 
rfmagunkban. na la a szimltAs-^ 
tocbn tkabfin karessuk a bibit. 

KizAr6lag a konyvbanl 
SagltaAgert pedig forduljunk 
blzalommal bArmelylk 30 Ml 6 
As 12 ev atattl azemuvagaa fiu 
lamarSsonkhoz. 

programunk mGkodik, gondoljunk az 6kori 
csodAkra, D» azArt na karassCik fol programunkkal egylk 
szoftverbAzat aam. . _ 

tS. Ne feladjukJ amlt ml t6Jfedeaunk F azt nagy vafAazInQ- 
aaggeiar6ttiink mAr nibAny mllUAan folfadeztAk. 
+f T Ha progfftmjafnk frAsa h futtatAsa kosiban vAratlan dolaok 
tortAnnek. amely^ magyarAzfttAt gyakorlott progromoz6 
barAtamk sem tudjAk, akkor: 

a) mAr tudjuk* hogy miArt hlvJAk gtipiinkflt h o me- compute r- 
nok 



b) otveagatauk a 
vsgo faiezetAt. 



•16tt Murphy tdrvAnykonyvAnek ide- 



BELOLROL 

© Htroldal- amelybfil kiderul. hogy az Omega nem feltetlenul POP-egyuttes - lehet szamlt6gep is. 

© Mimicsoda az Ente reprise-on? - mi megmondjuk. ha mar a gephez adott anyagokbbl nem deriil ki. 

q Atarlk6r-a korben pedig egy kis program, amelyet azok hasznalhatnak, akiknek a gepeben B Basic van. 

© Hosszu-hosszu vonalak - egy fras. programokkal es abrakkal tiizdelve. amelybfll kiderul tobbek kozott. 

hogy mi6rt megm6rhetetlen egy obol vagy fSlsziget hossza. 
q Programai&nlat - egy TVC Disassembler, amely dsszefuzhetfl a par hdnappal ezelfitt kozolt monitor programmal. 
(r\ Ismeri on a Primdt? - ha nem eleggd, akkor folt6tlenul olvassa el ezt az Irast amelybfil sok mindent megtudhat. 

Ha ismeri, akkor sem art az ism&les osszegzes. 
@ Szoftverotlete/t - egy pici kis zajkelto programocska a C16-hoz. 

q KUnyvmoly - amelyben egy olyan konyvet rigcsalunk. amely nem konyvesboltban kaphat6 
de ara sem mindennapi. 

@ Enterprise nyerd - aki palyazik a gepre most olyan feladatot oldhat meg, amely a gep megismer6s6ben is seg(t. 
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ENTERPRISER 



Gondolom, sok EnteipriM-tiilajdonos vArja apekedve a gdphax mell6kelt 
k6xikdnyvben beharangozott Enterprise Technikal IsmertetSt, ebben fal&l- 
hafrtk ugyanis fobbek k&ztift a cimben emIJtett csatlakoz6-kioszt£sok fa. 
A k#zlkftnyv ugyanis semmlfAle ilyen inform&citit - a cs&tlakoztik megnevezt- 
a&ri khrffcl - nam kdzol. Mt mindeitesotre klbogardaztunk n£hiny do* got. 



Ugy v6lem - gondolva a kis hazankban follelhetfi sokf6le 
tfpusti g6pre is gyakran tanficstalan tulajdonosaikra - a 
tenyek, adatok mellett 6rdekes lehet azok kiderft6s6nek 
m6dszer6t is ismertetni. Tegyuk fel tehat hogy adott egy 
szamft6g6p, amelynek kulonf6!e csatlakoz6i vannak. Is- 
merjuk a csatlsfcozdk nev6t. tehat hogy korulbaluf mire 
vaftk, 6s szeretn6nk megtudni, hogyan ke\\ bekotni azokat 
A munkahoz szuks6gunk lesz egy ellenfiltasm6rdre 6s egy 
kb. 15 Volt m6r6shatarki egyenfeszults6gG voltm6rf3re. 
Ha sikerul oszcifloszkbpot szerezni, az sem baj. Egyetfen 
dologra 6rdemes a g6p 6Eete 6rdek6ben vigyaznunk: a rend- 
szer br3vft6 csatlakoz6(k)hoz (System Bus, Expansion 
Port, ROM Bay stb,) NE nyuljunkl 
1. 16pfe: Keresailk meg a fdldpontotl 
Nagyon fontos! Mindenekeifitt kapcsofjuk ki a g6pet 6s 
htizzuk kf beltile a h6!6zati t6pegys6get (ha kglon van)[ 
flendszennt minden g6pen van t6bb6-kev6sb6$zabv6nyo$ 
koaxialis tv-csatlakoz6. Ennek kulsfi. nagyobb f6mharangja 
biztosan foldponi 6s rendszertnt jdl hozz6f6rhetfi. Az ellen- 
6llasm6rfi negatfv p6Iusat kossuk ehhez a ponthoz, a m^sik 
pdlusival pedig I6pegessunk v6gig a csatlakoztik kivezet6- 
seinl Kikapcsott allapotban ez egyik g6pnefc sem anhat. 
Az 1 Ohm afatti ellendllisd pontok biztosan fdldpontok. 
Ha 1 MOhrnos vagy nagyobb mar^shatArben sem mutai 
semmit a mflszerunk, akkor v6ttsunk polaritdstl Ha fgy is 
ugyanaz az eredm6ny, nagy valdszfnds6ggef a vizsgalt fib 
sehov6 sem vezet a tovabbiakban nem kell vale foglalkoz- 
nunk. 

2. I6p4a: VAIaaszuk az6t a klmanotaket 
4a a bemeneteket I 

Ez digitalis vonalak eset6n egyszerO. Elfiszor is kapcsofjuk 
be a g6pet! Egy kb. 10 kOhm-os ellenall6ssal aszerint 

hogy az ad on kivezet6s vo1tm6r6vel megm6rve alaphely* 
zetben magas vagy alacsony fesz0lts6gszintet mutatott, 
kossuk a klvezetfes azelienkezG potencillhoz? (Tehat ha 
p6ld£ul voltmfirfi egy labon 2 VoJtn6l nagyobb feszults6get 
jelzett terhdetlenul. kossuk azt a ISbat a foldhdz.) Ha a 
gSpbfil nam jon ki a +5 Volt egy laposelem negatfv sarkat 
a foldre kotve a pozatfv sarok megfelel a c6lnak. Harom 
eset 1ehets6ges: 

a) az ellan6llfis csak kicsit v& Itoztatja mag a faszult- 
a^get, akkor a m6rt vonal kimenet, 

b) a faaztiltsdg ellenkaz6j«re vdltozik (pi. 3 Voltb6l 
0 f 1 Volt lesz), akkor a vonal bemanet, 

c) az aredetilag +/-S vagy +/-12 voltos vonal fa- 
szults^ge sammit sem csokken, akkor tdpfeszults6g - 
kivezetlst taldltunk. 

AnaI6g vonalnai a fenti eljaras nem mindig j6, Mr bajt itt 
sem'okozhat. De altal^ban a g6peken a magn<3bemeneten 
kfvul nem szokott anaf6g bemenet lenni. fgy elsfi kozelft6s- 
k6nt foltehetjuk. hogy minden anal6g vonal kimenet. 

3. WpAa: Hatirozzuk meg a kivezet6eek funkci6itl 
Efre mdr nemigen lehet jltallnos receptet adnh a kove- 
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tendfi eljaras nagyban fugg a csatlakozd c§lj4t6l 6s az 

elfizfiekben megaTlapftottaktSl. N6zzunk n6h6ny esetet: 

CENTRONICS csatlakozd: adjukki sorban a kovetkezfi 

utasftasokat: 

LPRINTCHR$(0); 

LPRINT CHR$(1); 

LPRINTCHRS(2); 

LPRINT CHR$(4); 

LPRINT CHR$(8); 

LPRINT CHR$(16); 

LPRINT CHR$(32); 

LPRINT CHR${64) ; 

LPRINT CHR^O 28): 

6s mindegyik utasft^s utan m6rjuk meg a ktmenetek fe- 
szu1ta6geitf Amelyik vonal az e1s6 utasltds ut^n magas 
szinten mared az a printef STROBE bemenet6re kotendfi. 
A tovibbi utasft6sokkal sorban kiderithetjuk az adatbitek 
3orrendj6t Ha csak egy bemenet van, az minden bizonnya! 
a printer BUSY kimenet6re kotendfl. Tobb bemenet esst6n 
pr6bi!juk azokat egyes6vef magas szintre kotni mfg a 
tdbbi bemenet alacsony szinten van. Amelyik f^b folded- 
s6re megszakad a kifrds (lefagy a g6p), az lesz a BUSY 
bemenet. 

RS-232 vonal: itt rendszerint k6t bemenetet 6s k6t ki- 

menetet talalunk. Pr6baljunk a soros vonaEra adatot ki- 
kuldeni: a g6p vaJ6szfnaieg lefagy. Adjunk magas szintet 
az egyik bemenetre Ha a g£p elinduL megtaEdiiuk a CT5 
(Clear To Send) labat ha nem indul* prdbalkozzunk a ma* 
sik (majd a tobbi) bemenettef! Ezutan kuldjunk ki hosszii 
adatsorozatot pi. binaris 01 1 11000-t (hexa 78, az "x" 
k6dja) ! Voltmdrfivel m6fve a kimeneteket az egyik feszult- 
s6ge a minimfilis (0, -5 vagy -12V) 6s a maximSlis 
(+5, -t-12 V) k8zott lesz valahol, 6s ha v6ge az ad6snalc 
visszat6r 6latl6ban a minimalis 6rt6kre. mfg a massk vala- 
melyik sz6lsfi 6rt6ken marad, Az el6bbi lab az adatkime- 
net (TxD), az ut6bbi a vev6 KES2 jele (DSR vagy RTS}, 
A fennmaradt agy bemenet pedtg az adatbernenet (RxD). 
K6t g6pet ezek utin rjgy kapcsolhatunk ossze. hogy az 
egyik adatbemenat6t osszekotjuk a masik adatkimenet6vel 
a DSR labat pedig a m6sik CTS l£baval. 6s fordftva. M6r 
cmk az adatformitumot 6s az 6tviteli sebess6get kell egy- 
form6ra allftani a megfelelfi utasft6sok segfts6g6vel # 6s 
kezdfidhet az adat6tvitel I 

RGB-monitor kimenet: haram szfniel- 6s egy szinkron- 
je!-kimenetet kell m#gtal6lnunk. Aflftsuk a k6pernyfit 
(a keretet 6s a pap!rt is) feket6re. majd m6rjuk meg a ki- 
vezet6sek feszults6gszintj6tl Ezut6n 6llftsuk az eg6sz k6p- 
©my5t pirosral Gjra megm6rve a feszufts6gel az egyiket 
sokkal magasabbnak fogjuk taldfni: ez lesz a piros szfnjel. 
Hasonld m6don talalhatti meg a misik k6t szfnjel is. 
A szinkronjetet prdbalgata^al kereshetjuk az alaphelyzet- 
ben 2-4 Voltos kimenetek kdzott 



Ntezttk azak ut4n 
Enterprise- on I 



az eredm6nyeket az 



A csatlakoz6kat hStuln<§zetben SbrSzoljuk, a szamozSs 6n- 
kGnyes. NGhSny ISbr6l a fenti rendklvul tudomSnyos m6d- 
szerrel sem sikerult (egyeldre) kiderfteni. hogy micsoda, 
ezt egy fcis vizszinies vonatlal jelemik. 



MONITOR 



1. vided kepjel 

2. fold 

3. kek szfnjel (B) 

4. piros szfnjel (R) 
6. dsszetett szinkron 

(RGB-hez) 

6. +12 V 

7, jobb hengkimenet 



8. 



bal hangkimenet 
vided dsszetett szinkron- 
jel 

TTL kepszinkronjel 
TTL sorszinkronjel 
dsszetett fekete-fehdr 
videojel 
13. fold 

zdld szfnjel (G) 



10 
11 
12 



14 







B 



R CSYNC +12V JOBB HANG 



1 



2 

13 



3 

12 



11 



i 
10 



H r 



SERIAL/NET 



TxD RxD 




DTR CTS 



BAL HANG 



1. fold 

2. nines bekdtve 

3. TxD 

4. RxD 

5. CTS 

6. DTR vagy RTS 

7. nines bekdtve 

8. +5 V 



PRINTER : 



fold 

BUSY bemenet 
6. bit 

nines bekdtve 
6. bit 



1. 
2. 
3. 
4. 
6. 

6. 7. bit 



8. 1. bit 

9. 2. bit 

10. 3. bit 

11. nines bekdtve 

12. 4. bit 

13. STROBE kimenet 



7. 8. bit 








14. 


fold 


_L BUSY 


05 
-+- 


-*- 


06 


D7 


— H 


1 1 i 

1 2 


3 


U 


5 


6 
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U 13 


12 


11 


10 


9 

Hh 


8 


jl 5TE 


D4 




— h- 

D3 


D2 


D1 



CONTROL 1 4s 2 



1. fold 

2. - (kfmenet) 

3. nines bekdtve 

4. +5V 
6. balra 
6. fel 




7. tQz 

8. le 

9. jobbra 

10. nines bekdtve 

11. - (kimenet) 

12. joystick kdzds kivezetda 

M6sz&ros Gyula 



KOZOS 



TUZ 



AlARIHIKO R 




Tdbbfele aor ozatG Atari S00XL van for- 
galomban* A kulbnbsegtik a I adsorb an a 
BASIC vercldbsn rmJtatkozFk meg. Akik- 
nqk a gepevel programlras kdzben oly- 
kor aiefordul, hogy szd nelkuf lemarevo- 
d.k - kiakad - annak fdltAtlanul erdeme* 
ett a cikket t ova b bolva a nk Hyenkor 
ugyants caak a gdp klkapctolasaval - 
ezaz az eddigL munka elvaazte'eaVet - 
lahat tovabblfipnl a az meg Is hat 5s* r* 
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bosszantd. Mot az a j elan teg m gap 
BASIC-jfinek hibaja. A korifabl gtfpak 
(400 *s BOO) BASIC-ja tartalmazott 
egy eaornd hi bat, amelyat a BOOKL as 
80OXL magiaLanlsekor javftani kMti- 
tak a BASIC u eyrie vwzott „B varzld'^ji- 
val. A hi bat jdrGszt aikar titt ia kijawita- 
niwk, aE a fenti hiba azonban magma' 
radt, a«t egy tijabb la f ,k*ozdddtt"- N#- 
vazataaan az, hogy a SAVE-val k I mafi- 
tBtt programok mindan eg yes mentis* 
kor IS byte-tal hoaozibbak leazftak. 
A g6pcsaWd harmadlk ^gartarecidja" 
kiadAsB alfitt {SBXE ei 130X1) ujbdl 
javltottak a BASlC-an a „C vantrd ,r *vat 
es bz rnir si k err el la {art, A 800X^ak 
kes&bbl aorozataL m4f aft a BASIC- at 
tannlmazzak. Hogy klnak mi lye n - A^ 
B vagy C BASIC* at tartalmazd g4pe 
van, art ogyaatarOan klderfthatjuk az 
ela bbi mddon : 

Kozvetlen uzemrnddban (tahit aorazim 

oe\km gapeijiik be a k6vetkazdket: 

7 P£EK(43234> (RETURN) 

Ha a grip 1B2-val valawol f jk 

hm 96- „B varzid", ha 234 -a! rr C var- 

ild" van a g«pban. {Ezt euyei>kani a 

program maga la allendrzH) 

Noa f ho BB-oX kapunk r van 4rtalma az 

tft kdzdlt program bagapalMnak. Fz 

ugyania a „& varzld^bdl „C"-t esin*l! 

A prog ra mot futtetaa aldtt mantaOk aL 

a sat la gas Jevftaa e*et«"re, majd futtas* 

auk, A fuuatiskor a g«~p allendrzJ ■ 

BASIC vatxidt Aa a dlazfcre agy BASICC 

a1fiavez4i0 fHa-t fr. 

Exutin ha haaznaLnl akarjuk: 

ENTER "OiBASICC" (RtTURftl) 

ea utana RUN, 

tA PAGE I c + amjof ATARI folydiratban 
magjatant dkfc nyomlnt) 
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Iskolai tanulmdnyaink sordn megtanultuk 6s meg is szoktuk, hogy egy-egy 
vonalszakasznak - legyen az akdr egyenes szakasz, akdr bArmiiyen kacskarin- 
g6s gdrbe darab - j6l meghatA rozhatd hosszdsdga van. Ez a hossz6s£g gyakran 
mirhetS, mint az egyenes egy-egy darabj£nak esetdben. Mdskor viszont ki- 
szdmlthatd: fgy pdlddul a kttr keruletdnek meghat6roz£sakor is ismert a 
Ludolf -f 6le sz£m - kSzismert nev6n a PI -3,1 41 6926. . . - amelynek segits6g6vel 
tetszfileges pontossdggal meg tudjuk adni az adott sugar A kdrvonal hosszAt. 



Sok, valamennyire is sza- 
Mlyos gdrbevonal hossz6- 
nak sz6mft6s6hoz I6teznek 
hason(6 6lland6k 6s k6ple- 
tek, mint a kor eset6ben - 6s 
ettfil konnyen elbizakodott6 
is vdlhatunk. Elv6gre mi is 
kell egy vonaldarab hosz- 
szCis6g6nak meghat6roz6s6- 
hoz? Vagy egy j6 k6plet 
ami rogton szofg£ltatja az 
eredm6nyt, vagy pedig egy 
pontos m6rfieszkoz - mond- 
juk, egy adott hosszusdgti 
m6rSI6c -, amivel I6p6sr6l 
I6p6sre Iem6rjuk a r6szhosz- 
sztis^gokat, majd osszegez- 
zuk 6ket. Nos, 6ppen az 
ut6bbi m6dszert kovetve 
kerulunk bajba - ami pedig 
az egyenes szakaszok eset6- 
ben nagy hasznunkra volt. 



FELSZIGET 



A legAItalinosabb gorb6ket 
vizsg6lva konnyen arra a 
ko vet keztet6s re j uth a tu n k, 
hogy a vizsgSIt vonalszakasz 
eg6sz egyszeruen „m6rhe- 
tetlenul" hosszti - a sz6 
szoros 6rtelm6ben is, azaz 
nem tudunk olyan m6r6l6- 
cet talStni hozz6, amellyel 
val6ban meg tudnSnk ha- 
t6rozni a hosszdt. 
Erre a klasszikus p6lda egy 
f6lsziget, amelynek a part- 
vonal-hossziis6g2it szeret- 
n6nk megm6rni. Nosza, ve- 



gyuk eld a leghosszabb 
mdrcdinket, 6s fektessiik 
vdgig a fdlsziget part- 
j&nl Ha ezek hosszait osz- 
szeadjuk f akkor nyilv6n lesz 
m&r valami kfizelitS ada- 
tunk a minket 6rdekl<5 meny- 
nyis6grfil. Ha azonban fele- 
akkora m6r6rudakat ve- 
sziink el6, 6s ezekkel pr6- 
b6lkozunk, akkor a part 
hossza nagyobbnak fog 
ad6dni, mint kor6bban. Hi- 
szen ezekkel a rovidebb 
m6rfip6lc6kkal m6r olyan 
kisebb 6bl6csk6k. kisebb 
kiszogell6sek kerulet6t is 
nyomon kovethetjuk, ame- 
lyeket az elfibb vaskos bot- 
jaink 6rz6ketlenul 6thidal- 
tak. Csokketsiik most ism6t 
fel6re a m6rc6k hosszit! 
Az elfibbi okok miatt most 
tijra csak nagyobb ered- 
m6nyt kapunk. £s ez fgy 
megy, a partszakaszt alkot6 
homokszemek m6ret6ig - 
vagy azon is tul... Ezt 
pr6b6lja 6rz6keltetni elsfl 
programunk, mely - mint 
a tobbi bemutat6 program 
is - Plus/4 g6pre k6szult. 
A program egy elsfi I6t6sra 
der6kszogQ hSromszoghoz 
hasonllt6 f6lszigetet (vagy 
tengeroblot - kinek-kinek 
fzl6se szerint) t6rk6pez feL 
mind jobban finomftva a 
m6r6s pontoss6g6t. Ennek, 



5 RE '■ * : ¥*e** FEUSZ. J Gr= " 
IS COLORS , 2 : COLOR 1 . i 
29 GP.Hr'HI C2. ■ 1 
3y DIHHC25£> 

4-3 in < id = 123 : P''" i 2'-' '■ =l> i ■ 7 \ _ -\ -. l-. 
33 F0RK=7T0SSTEP- 3. " ' ^ 

U© ^TI:GETtr.EVR*- sC-WCLR. b+EMTK W 



Jul is persze hat6rt szab 
a k6pernyfi f illetve a sz6mf- 
t6g6p felbontot6k6pess6ge 
- 6s ez 6rv6nyes a tov6bbi 
programjainkra is. Vagyis a 
k6s6bbiekben hi6ba hivat- 
kozunk idfink6nt a „v6gte- 
lenre", a programok csak 
addig futnak, amfg I6tha- 
t6 a Mpernyfin valami 
v£ltoz£s. Ennek ellen6re 
hisszuk, hogy a I6tv6ny 
nyujt majd valami lijdon- 
s^got a programok bepo- 
tyog6inek, 



POWTOK TEROLETE 



A vonalr6l kezdtunk be- 
sz6lni. 6s itt is folytatjuk. 
Tulajdonk6ppen mit is 
nevezunk vonalnak? 

Euklidesz - a ma kozkeletfl- 
en haszn6lt m6r az 6ltal6- 
nos iskoldban is tanftott 
geometria megalapozbja - 
egyik mQv6ben az egyenest 
mint „sz£iess6g ndlkuli 
hossz(isAg' r -ot emtfti. Ezt 
Igy tanultuk, fgy tudjuk. Azt 
is tudjuk, hogy a pont az a 
geometriai alakzat amely- 
nek sem sz6fess6ge. sem 
hossziJs6ga - azaz semmi- 
lyen ir6nyQ kiterjed6se - 
sincsen. A kdvetkez6 p6lda 
azonban ta!6n elgondolko- 
d6sra k6sztet mind a pont 
mind a vonal fogalmdval 
kapcsolatban: 

Rajzoljunk egy egys6gnyi 
oldalhossz0s6jgii - 6s fgy 
egys6gnyi teruletfl - n6gy- 
zetet majd vigjunk ki be- 
I file egy nagy keresztet dgy t 
hogy rn6g mindig meg- 
ma radjo n a n6gyzet 3/4 r6- 
sze - vagyis a kereszt teru- 
lete legyen 1/4, N6gy kis 
n6gyzetiink maradt de eze- 
ket csonkftsuk meg ism6t 
egy-egy kereszttel, tigy, 



hogy a most elvett keresztek 
osszterutete legyen t/8. A 
meg m aradd n Ggyzete kb<5 \ 
vegyunk ©) ism£t kereszt 
alakii rSszeket amelyeknek 
osszege most 1/16 legyen 
- 6s folyt&ssuk tovibb ezt 
a nem till ttaztess^ges 
p ,negyzetcsonkft6" eljirfist 
akSr a v6gtelens£gig + 
Nyilvdn mindenki Ogy gon- 
doija, hogy ha nagyon so- 
kSig mOvBljuk ezt a n£gyze- 
tekkel, akkor azok pontti 
zsugorodnak ossze. fgy nut- 
ta lesz a teruletuk, Nos, 
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egyenkSnt egy-egy ilyen 
n6gyzetet vizsgAlva ez igaz 
is iehet - de a n^gyzetek 
{ po n to cs kfi k) ossze ssGg 6 1 
UletGen $emmik#pp sem. 
Ugyanis eldszdr ettdvolftot- 
tuk a teljes ntigyzet terule- 
t^nek 1/4 r£sz£t Maradt 
1_l/4, Kovetkezett az 1/8 
r6sz tdH^se - de ezutan is 
meg maradt a teljes nigyzet 
1 -{1/4+1/8) r£sze, Nem 
l^rtynk sokkal jobban az 
ujabb kereszt tetorlSs6vel 
sern: m&g fgy is meg maradt 
a teljes n^gyzet 1 —(1/4+ 
1/8 + 16) r6sze. M6g aki 
nem is £rt a hatgr^t^ksza- 
mft6shoz, nyilvSn az is rog- 
ton rajon- hogy a zSrtijelben 
l£v<5 kifejez£s soha nem Sri 
el az egyet azaz n£gyzetunk 
fel!Gtetezett teruletft, Aki 
viszont s/a lamely est is ko- 
nyft a matematikSnak ehhez 
az agahoz. az tudja. hogy 
amit zar6jelbe tettunk, az 
v£gtelen sok I6p£s ut6n is 
legfeijebb 1/2 lehet ~~ Jgy 
ez eredeti nGgyzetbfil 
m6g a sok-sok kereezt 
ut4n Is olyan „pontok' J 
egyiittese marad, ame- 
lyek Sssztemlet© meg- 
egyezik az eredeti nGgy- 
zet fa!6vel. 

Vagyis e pontoknak terute- 
tuk van, amely egyenlfi a 
teljes n£gyzet teruletenek 
fetevelt 



VONALTERULETE 



Most talan mar kellfik^ppen 
sikerult elbizonytalanod- 
nunk a „sz6less6g", „hosz- 
szCisag" fogalmakat illetGen. 
De hogy egy vonalnak is 
lehessen terulete - vagy 
legalabbis affile, amit mi 
annak nevezunk? 
Tegyuk a k6vetkezStl Az 
egyszerus#g kedv66rt vfi- 
lasszunk megint egy n§gy- 
zetet r majd ezt osszuk fel 
Ogy, hogy egy ,>U" eiakCi 
s^v mentdn be lehessen 
jarni. Ez nem nehez, hiszen 
csak a n6gyzet koz6ppont- 
jat6l kell egy egy egyenes 
szakaszt hiiznunk valame- 
lyik oldalfelezfipontig. 6s a 
sav maris elfiall. A masodik 
I6p6s mar nehezebb - az 
iment felosztott teruletet to- 
vabb bontani dgy, hogy a 
fekete sav osszefuggfl ma- 
radjon, azaz sehol ne sza- 
kadjon meg. 

Minden tovabbi magyaraz- 
kodas helyett jobb, ha meg- 
nfezuk a Peano gorbe prog- 
ramot, illetve futtatasanak 
eredm6ny6t! 

A kapott abrab6l Iathat6, 
hogy a fekete siv egyre 



5 REM F'ERHO— GOKGE 

IS COLORS .■ 2- 
■2i? COLOR 1 .' 1 

BO'Al ; 97 , 3 1 i 223 . tW * * 1 
5^ DRfii^e , I -S3 , y4TU 1 1 53 
G6 F0RK=8T04 
GS R=2t(5-K) 
78 FORI = IT02 T1< 

30 FOR-J=1T02-TK t l _ 

96 LOCRTE96+ I * 2- 1 > * 2*R . 39 + < ■ J * 2- 1 ? * R 
1 29 LOCBTE+ R .■ +9 m _ _ ^ _ 4 

125 IF ROOT < 2 > =^THE,^ tX=* 1 ■ LOCmT E- R + ki : u: JTU I 

135 ifrSgTCS^^THEMX-S = LOGRTE+R, +Q " GOTO 1 

145 TFRD0Tt2>^fTHE:NX=3 i -R' ' OOTQ i 

1 50 LOC HT E -5- S . - R* 2 

i55 IFPDnTC2>=0THEHX^4 = LOCRTE+9 +R ^GuTCfl 
1 OHXOO3UB2O0 , 3S0 4 OS , 509 
1 7 ft HEX T-J : NEXT I - HEX! 
IS© END 

2@Q LOCRTE-R/+K 

- l 1 8 D5?RU0TO+ R * +33TU^0 - 2*R i U-R + y 
228 LOChT E-h3 R ; DKHl4£T0 -Ri+ S 
■--"25 L O C RTE+ 2 ^ R * + 2 R 1 OR fiWST U R < 0 T U + 3 / 
2^S L 0 CRT E +R • +9 : DRFN 1 , J '- e i - 2*P. 

40 LO C R T E- R ✓ + *3 : 0 R R^ 8 s ! - ! + S ^ " R T 0- R + W 
250 RETURN 
3 0'"i LOCRTE-i- R , - R 

3iS DRRW0TO— R." + STO+0 ^2*R i O+R, +kJ 

320 LOCRTE+ kJ - R : DRR W 0 TO+R j + O 

^25 LQr:P TE- 2:* fi' * - 2* R : DRRMO T U-R .■ +0TO +0 , + R 

^3^ LOCATE— R ; ORRWOTO+Q > +2*R 

3^0 L'"i t": RT E + R + @ ■ D RhU0 i. U + @ / + R T O + R / + 0 

350 RETURN 

LOCATE -R/-R 
41 0 DRRW^TO+Sj- +RTO+2#R/ +QT0+8. -R 

4- [ y LOr:RTE~^ 1 , +0 : DRRUiaTO+0 .- -R 

4?5 LOCATE- 2* R , +2*R : ORB WOT 0+0 , +RTCMR , +vj 

430 LOCOTE+0 / +R 1 0RSH«T0+2*R / +0 

440 LOC RT£+ fl,-R: ORRUOT 0 + R ,+QT 0+ « / ~R 

450 RETURN 

500 LOCRTE+R/+R 

5 i 0 OPfiWeTO+e i -RT0~2*R , +OTO+0 , +K 

5- 0 LOCATE + 1? , + 0 : O R H WO T U + 0 .■ R 
525 L0CRTE+2*R -■ -2*R 1 ORRW0TO-S-O t -RTO-K 
^30 LHCRTE+ 3 - R : OR R WOT U ~2*R / -+Q 
540 LHCRT E+S / -t-R ■ DRRUOTu- K , +STO+0 , +R 
550 RETURN 
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inkibb alvAkonyodik, de 
akozben rnindv6gig obz- 
tzafuggfi marad, Ugyan- 
akkor kiderul az rs, hogy 32 
eredeti n^gyzetnek mind 
tobb 6s tobb pontjdn hafad 
St Magyarut: ha ezt a s£v- 
szfikft6st, gorbftgetGst min- 
den hatSron tilt folytatjuk, 
akkor a minket 6rdekl6 siv 
vonallA szGkul ossze. Ez a 
vonal viszont 3tmegy a 
n^gyzet minden pontjin. 
Azaz teriilete lesz, ami meg- 
egyezik az eredeti ndgyzet 
terulet6vel. 



SZIGET tS TAVAK 



Ezek utfin dgy tQnik. hogy 
ismdt meg kell vizsgilnunk 
az egyenes imdnti, Eukli- 
desz Altai adott meghatdro- 
z&s&X. Nos, Euklidesz m6g 
egy meghatdroz£sdt adta a 
vonalnak: egy mAstk te- 
frtsa szerint a vonal „felU- 
letek hatdra". Elsfl pil- 
lantisra ezt is 6rthet6nek 
tartja minden ki: vagyis vo- 
nal (szakasz) az, ami a sfk 
k6t r6sz6t elv£lasztja egy- 
mSstdl. Az igazs£g azonban 
az, hogy ez sines mindig 
(gy. Ezt mutatja meg ko- 
vetkezfi p6ld£nk, amely 
Wada japSn grafikust6l ered. 
fgy sz6l a mese: egy szige- 
tet minden ofdalr6l tenger- 
v(z vesz korul. Ezen a szi- 
geten van egy hideg vizQ 
6s egy meleg vizd t6. Egy 
napon a sziget korm&nyzdja 
elhatSrozza, hogy a lakos- 
sSgot ellStja mindh£rom faj- 
ta vfzzel: a s6s tengervfzzel, 
a meleg 6s a hideg vfzzel is. 
Aznap csatornAt fisat a ten- 



gerpartrbl 6s a k6t t<5 partj£- 
r6l tigy, hogy azok ne ke- 
resztezztSk egymist - elv6g- 
re akkor osszekeveredn^nek 
a kiilonbozfi minflsdgfl vi- 
zek - de azt is megkfvAnja 
munk£sait6L hogy a sziget 
bfitmefy pontj£t6f egyik 
csatoma sem legyen t^vo- 
labb. mint egy hosszusig- 
egys6g (mondjuk 1 km, 
hogy ha kis szigetrGf van 
$26). 

Eljon a kovetkezfi nap, 6s a 
korm3nyz6 m§g tobbet akar 
tenni n6p66rt Utasftja mun- 
kSsait hogy folytass^k a 
hSrom csatorna kiaiakftdsdt 
tigy. hogy azok Mrhonnan, 
legfeljebb f6l kilom6teres 
tSvolsfig megt6tel6vel el- 
drhetfiek legyenek. AzutSn 
a kormSnyzd napr6l napra 
ligy adja ki utasftasart, hogy 
a csatorndk fele akkora t&- 
vols^gra legyenek a sziget 
bSrmely pontj£t6l, mint az 
elfizfl napon. 

Ha most felt6telezzuk. hogy 
a kormfinyzb 6r6k6letG 
- hiszen mesSrfil van sz6 
akkor nyilv£nval6 az is, 
hogy a sziget foldterulete 
vonal v6konys6gtira fino- 
modik. S v6gul is tijra itt 
All elfittunk egy vonal ami- 
hez tetszfllegesen kozel ta- 
ISIunk tengervizet, hideg t6- 
vizet 6s meleg tdvizet is - 
azaz a szigetbfil meg ma - 
radt vonalszerG fdldsiv 
nam k6t, hanem h&rom 
tartomdnyt vdlaszt al 
egymfistdl : a h£romf£le 
vfztartomSnyt. Egy ehhez 
nagyon hasonl6 vonalat dllft 
elfl kovetkezfi programunk, 



emefyet kitaldlAjlrdL a len- 
gyel matematikusrdi iftafl- 
ban „Cantor-tefft6nek" ne- 




veznek. Rajzoljunk Ojra egy 
feltoltott nfigyzetetl Ezutdn 
osszuk fel 3*3 - azaz 9 - 
kisebb ndgyzetre, majd td- 
volftsuk el ezek kozul a kd- 
z6ps6tl Amegmarad6 kere- 
tet alkotd nyolc kisebb 
n6gyzet mindegyik6t osszuk 
tijra kilenc-kilenc r6szre. 6s 
ezek kozul is toroljuk min- 
dig a koz^psfit! 
Tal^n mSr mondanunk sem 
kell, hogy ezt az eljSrSst is 
a „v6gtelens6gig" kell foly- 
tatnunk, mfg a megmaradd 
h^ldzat vonallA finomodik. 
V6gul is az fgy megmarad6 
vonalnak is teriilete lesz - 
m6gpedig el6g nagy (ha ez 
a kifejez6s haszn6lhat6 itt): 
az eredeti n^gyzet teruletd- 
nek 7/8 r6sze. Ez a gorbe 
egy6bk6nt m6g szSmos 6r- 
dekes tulajdons^ggal ren- 
delkezik - de ez m5r kfvul 
esik mostani vizsg^lddisa- 
ink tSrgykorSn. Az 6rdeklfi- 
dflknek a halmazeEm£leti to- 
pol6gia, 6s azon beliil is a 
Cantor f^ie gorbfik tanul- 
minyozis^t ajSnljuk^ 



ZSEBKEND0 



T6rjunk vissza inkSbb a m^r 
az els6 p^ld^nkban emlftett 
f6lsziget-partvonalhoz ! 
Ugyanugy, a hogy egy-egy, 
ak^rmennyire gorbult vonal- 
szakaszt tetszfileges pon- 
tossiggal kozelfthetunk 
mindinkibb rovidulfi egye- 
nes darabokkal, ugy egy 
dimbes-dombos felszfnt 
is egyre pontosabban, 
egyre f i nomabban lefed- 
hetunk egyre kisebb m6- 
retQ sikdarabokkal 
(n6gyszdgekkel vagy hfi- 
hdromszdgekkel). fgy r 
ahogy egy f^lsziget partvo- 
naldnak hosszdt fokozato- 
san csokkenfl hosszOs^gd 
m^rfil^cekkel kozelftettiik, 
ugyanfgy p6ld^ul egy hegy- 
orom felszfn^t is megm6r- 
hetjuk mind kisebb n6gy- 
zetlapokkal. 

Ezt a m6dszert egy6bk4nt 
tetsz6leges, elk6pzelt felu- 
letek megrajzo!3s£ra is 



5 REM ****** CftHTOR-TERITO ***** 
IS COLORS/ 2 
COLOR 1 , 1 
3Q GRBPH i C 2.- I 

32 BOX 1 / R / B j S 'i -+R , 3 i + B / 1 
<ift FORK=t-3TO o 
58 F0RI = lT03'fK 
68 F0P-T=iT031K: 

65 P= 1*3-2 : Q=-J*3-2 : h =3 t< 3™K> 

67 XS=fl+P*F : V0=B+Q*F 

B0X9 / X8 * V9 t ><8+'F - 1 , V0+F- 1 / 1 
^EXT-T : KEHT I : GETK.EVH^ ■ bi.fc.XTK 

3© GRRPHIC0 
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ZSEBKEND-. 
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;i ^96 e / P . S > -2:24 
^3 PKP > 1-5 > =?J€ H < F P i 0">=224 
49 ft<fl i * i'^S : Ri i P i t '< = 3t- 

IIS F0RK.=3T0o 

128 L=PV02110 

1 30 FOR t =GTGPSTEPL_ 

'i H=fs (1,6/8) ■ C=FK L - 0 ■ 1 / 

1 5 0 F C R J=LT G F' STEP L 

1£8 E=FK I ■ -J * 9 ) 1 M— H< i ^ -J I > 

170 DRflljiL fi,CTOB:>D 

t75 fK I - J , 3 > =< R+B :< /2+L( < gflg < I ■ - 

176 fK I , J-L,'2 , 1 > =< C+O 3 /2+L* <RNEK 1 >- 

ISO R=B : C=G 

IS© NEXTJ--NEXTI 

200 FGR-J=0TO64STEF'L 

210 R=R f -"S / -J 0 > : C=?H < 0 .- J , i > 

22Q FGRI=L TOPSTEF'L 

23G B=R<'. I , J f 0 > 3— FK I r J / 1) 

240 DRRW1 fl/ CTGB D 

24'- R C I-L/2, -J / S > = < R+B > / C RHD <. 1 j - 

2*3 R< I-L/2, -J, l> = <Ci-D)/2+L*CRHG<l>-- 
245 IFJ-O0THEH GO SUB 60S 

R— S 1 L-— D 
330 NEXT I = NEXT J 
;-:32 GETK'EVR^ 
335 SCNCLR 
340 KEXTK 

500 GRAPHICS* 0- END 
600 G.=fi < I # J 0 > + R < I -■ -J - L , w > +R <- i -t 
£10 0=02+ AC I -L / -J--L .< 0 > >/4+L*CKHC 
630 A< I-L/2; -J-L-/2.. 0;-=Q 
£40 tt=R<I, J, 1 >+R<I .. -J-L, 1 >+FK I-L, J, : 
6<=- lS 7i Q= c; O+fl I -L , J-*_ , I > > /4+ L* i RNG < 0 - 
670 R < I-L/ 2 / J-L/2 , 1 > =Q 
£30 RETURN 
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hasznSlhatiulc bizonyira 
az olvasti is talfilfcozott rn6r 
ezzel - bir tal^n nem tud 
r6la; Igy p6ldAul a ^Csil- 
lagok H 6boriiia" sorozat 
h Attere i ne k megte rvezfed - 
n£L is gyakran ezt a m6d- 
szert alkalmazt^L 
Utolsd pdl daprog ra m u n k 
egy eff §le felulet kialakulft- 
sit mutatja be, Szok^sunk- 
hoz hfven ism6t epy n^gy- 
zetb61 indulunk ki. EizutSr 



ennek oldalhosszOsSgSt fe- 
Iez2uk tdbb l^p^sben. Ez 
persz© mfig nam erednrtfi- 
nyezne t^rbeli hat£st de az 
ujonnan kialaku!6 nbzn&gy- 
zetek koz6ppontjSt vala- 
mi nt oldalfalezfi pontjait 
mi n dig eltoljuk egy v^letlen 
6ft6kkel. fgy azutin a ka- 
polt k6p oTyan lesz. mintha 
egy zsebkend6t fotyamato- 
san osszegyflm^nk. 

Tatter J dzsef 
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Rttltpg&frrencse ha egy lap kdzilt egy programot, kdzben vala- 
kt fejleszt egy masikat, amely sok szempontbdl kiegeszftE 
art, a veietlentil a kit program 6ssze is ifleszthetfl. Nos, ez- 
tittal ez tdrtent. Majusban jelent meg a BIT- LET- ben Ddrner 
P6ter TVC-re keszltett monitor programja. Ezutan erkezett 
hozzfink Szofdatics Jozsef disassemblere. Akinek tehdt si* 
kerult a monitor! bepdtydgnte, annak erdemes ezt a progra- 
mot Is befrni, majd a kdzdlt mddon dsszefesulnl a kettfft.- 
Azt mar csak az trdekesseg kedveert jegyezzuk meg, hogy az 
dsszefestilesi (MERGE) eljarast is a BIT-LET-bffl vettilk 
(1986. szeptemberf szdm). 

Termiszetesen aki dnaildan, csak a disassemblert akarja 
hasznalni, ezt is megteheti. 



DISASSEMBLER 



A programmal megnSzhetjuk mi van a mem6riaban. de saj- 
nos befrni nem lehet vele, viszont tud disassemble™, 6s 
ha szoveg van a mem6rteban kifrathatiuk vele a karaterek 
ASCII kddjait. 

Fontos tudnivalb, hogy mivel a program BASIC-ben fr6- 
dott a ROM-teruletet nem lehet olvasni vele! 

KEZEUSJ 0TIWUTAT6 

A program beolvasasa utin a g£pet nagybetfls uzemm6dba 
kell alfftanL (CTRL+LOCK) 

A RUN parancs kiad^sa ut^n a program a kovetkeztfkkel 
jelentkezik be: paging byte 70H, ford ft ^si elm 0000 H, 
nyomtatb kikapcsoTva £s Disassembler uzGmmdd, Ezut&n 
a rendszer parancsra va>, ami egy billentyu megnyomSsat 
jelenti. A parancs billentyu funkci6janakv6grehajtasa ut£n a 
rendszer tijra parancsra vaY 

A parancsok kiacMsa a kdvetkezd billentyQkkel tftr- 
t6nik: 

if - MegvSltoztk a nyomtatti altapota, mely a kdpernyfin is 
kovethetfi. A "be" fell rat art jelzt r hogy mindaz az infor- 
m6ci6, ami a k£pemy6n megjelenik, a nyomtat6n is ki- 
nyomtatddik, A ..ki" feHret pedig art jelzl hogy a program 
csak a k£prny6re dolgozik. 

A - Gj fordft£si cfmet kerdez a program A cfm bead£sa 

hexadecim&lis alakban Etirt^nik. (nagybetuk ! I) 

P - Oj paging byte-ot kerdez a program. A paging byte 

beadasa hexadecimalis alakban tort^nik 

„Sz6k6z" - A k6perny6n (nyomtat6n is, ha be van kap- 

csolva!) egy Ores sorjelenik meg (fordft£sok tordelSse!). 

Ezek a billentyDk nem ( I ) vfiltoztatjfik meg a prog- 
ram Uzemmddj6t. M£s uzemmddot a kdvetkezd 
billentyQkkel lehet elerni. 

D - Disassembler uzemmdd. Ekkor a g6p a beallftott cfmrfll 

fordft, fordftas ut^n a cfmmutat6t (Address) I6pteti. 

W - Word uzemm6d. Ekkor a cfmtfll egy k6tbyte-os sz&- 

mot olvas, a g6pi nyelvhez hasonl6an fordftott sorrendben. 

B - Byte uzemmtfd. EIGszor megk^rdezi, hogy mennyi 

byte-ot frjon egy sorba (min. 1, max. 12). majd a parancsot 

vdgrehajtja. 

T - Text uzemm6d. Ekkor ASCII k6dokat fr ki (mSr ha 
van, ha nines, akkor "." jelenik meg helyette). Elfiszor itt is 
a byte-ok szamat kell beallftani (min. 1, max. 24). 
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DISASSEMBLER ES 
NION I ASSEMBLER A TVC-RE 



Minden, ezekt6l kulonbdzfl billentyfl megnvomasa eset6n 
a beallftott uzem egyszeri v^grehajtasa tdrt6nik, de a Byte 
6s Text uzemm6dban nem k6ri a byte-szam beallft£sat 
Ojra. 

A k^pernyfin megjelenfi sz£mok mind hexadecimalisak! 
PROGRAM LEfRASA 

3010-3150: Kezd66rt6kek felvStele, dbra rajzolasa, alap- 
allasba alias 

3160-3210: FGag. Mindig ide t6r vissza, itt varja a bil- 
lentyu megnyomSsat, majd meghfvja a v§grehajt6 szub- 
rutint 6s ujra var. 

3500-3950: 0zemm6dok szubrutinjai. 

5000-5530: A fordft6 szubrutin magja, ma> magaban is 

tobb6-kev6sb6 mflkod6k6pes. 

6000-6340: KozhasznO szubrutinok, tobb program is 
hasznaMja 6ket. 

8000-8700: A mukod^shez szuks^ges DATA-k. 
N6h6ny kituntetett vtiltozd: 

LEP£S$: tartalmazza a parancsbillentyuket 

MOD: uzemm6d parancsbillentyflj^nek sorszama L£- 

p£S$-ben 

PC: fordftasi cfm 

VS$: minden kifratand6 informaci6 a V$-be kerul, 6s ez 

frat6dik ki a megfelel<5 helyre 

PAGING: tartalmazza a Paging byte 6rt6k6t 

NY: nyomtat6 6llapot6t tartalmazza, 

ha1, akkor kikapcsolva 

ha 2, akkor be-kapcsolva a nyomtat6 
A program bdvftesdnek mtfdja: 
Az iij parancs betdj6nek befr^sa a L£P£S$-be a 31 50-es 
sorba, majd a 3200-as sorba a parancs v6grehajt6s4nak 
sorszamat kell befrni. A vSgrehajtasi rutin v6g6n RETURN- 
nek kell lenni. 

Szofdatics Jdzsef, Kapuva>, Grmn^zium 9330. 
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Most jdhet - ha akarjuk - a Mt program dssze- 
f6sul6se. 

Cspedig a kdvetkezSkdppen : 

1 . Betoltjuk vagy befrjuk a majusban megjelent monitor 
programot. 

2. A 420-as sorban talaThat6 1E4 helyett (10000) 
16500-at frunk. 

3. Kibfivftjuk a kdvetkezd sorral: 

1065 IF QW$="a" THEN POKE 2918,1 :RUN 3010 

4. Ezutan a programb6l kazettds file-t csinalunk: 
OPEN OUTPUr'MONITOR":LLIST#5:1-2950: 
CLOSE OUTPUT 

Sorz3ras elfitt indftsuk el a magn6t! 

5. Ezutan betoltjuk vagy befrjuk a disassemblert. 

6. A program 31 50-es soraban a l_£P£S$ v6g6t kiegtazft- 
jilk egy M-mel 

7. A 3200 sort kiegdszftjuk egy 3300-as sorszSmmal. 

8. frunk m§g egy sort a programhoz, 6spedig: 
3300 POKE 2918,0:RUN 



9. Ha ez k6sz, akkor kiadjuk az al^bbi parancsot 6s meg- 
v£rjuk amfg a k6t program ,,6sszef6sulk6dik" 

OPEN'MONITOR':POKE 2818,5:CLOSE 

(a magn6tterm6szetesen azelfibb kSszftett kazettSs file-hoz 
tekerjuk 6s elindftjuk) 

VigyAzai! A beiikszt£s mflveiete hosszabb ideig tart mint a 
kazett£n kGl program kbzti szunet. Ez6rt a nem t£wez6r!4ses 
magntikat a DISASSEMBLER v£gGn dllltsuk meg I Ha a do- 
log Jgy nem mGkodik. akkor az OPEN utaslt^st kolon keif 
kiadnL s a tovAbbiekal azut£n< hogy a MONITOR fejSt be- 
toftottuk. 



3010 GRAPHICS 4 

3020 SET P ALETTE 81, 0 , 65 .20;BOFD: 17 

3030 TINTA=1'PAPIR=0 

3040 SET INK T INT A ; PAPER 3 

3050 PRINT AT 1 , 3 : STRING$( 28 , 126 

3060 PRINT AT 2,3:"* TVC Z-80 DISH (C) Sz.J *" 

3070 PRINT AT 3 , 3:STRING$( 28 , 126 

3080 SET PAPER PAPIR 

3090 PLOT 32,662:991, 662 ,32, 658; 1,658 
3100 PC=0:PAGING=112:NY=1:HOD=1 
3110 GOSUB 6150:GOSUB 6170 
3120 GOSUB 6190:GOSDB 6230 
3130 GOSUB 6050 

3140 DIM OP${39)*8,Y$*45,Q$*32,Q*32 
3150 LEPBSS="DANP WBBTT":M=1 
3160 GET X* 

3170 FOR 1-1 TO LEN(LEPES$) 

3180 IF X$=LBPES$(I) THEN M=I:GO 3200 

3190 NEXT I:H=HOD 

3200 ON tf GOSUB 3590,3570,3500,30,3510,3700,3760,3780,3860,3880 
3210 GOTO 3160 

3500 NY=((NY-1) XOR 1)+1:GOTO 62 
351D ON NY GOTO 3530,3520 
3520 LPRINT 

3530 PRINT AT 9 , 1 :CHR$( 25) : RET0R 

3540 PRINT AT 7 , 19 : " " ; : INPUT PROT "Paging" :Q1$:Q1*=Q1*( : 2) 
3550 GOSUB 6110 : PAGING=Q1 : GOSUB 90-GOSUB 6160 
3560 PRINT AT 7,19: STRING$( 12 , 32RET0RN 

3570 PRINT AT 7,19- INPUT PROT "Address-" :Q$ : Q$=Q$( : 4 ) 
3580 GOSUB 6130: PC-Q : GOSUB 6160 :>TO 3560 

3590 HOD-H :GOSDB 6230 . P_C=PC : GOS 5000 : GOSUB 3530: GOSUB 6330 
3600 PC=PC+L*INT(A/140)+INT( (A-I{ A/140 ) *1 40 )/35 ) 
3610 FOR I=P_C TO PC 

3620 CIH=I : GOSUB 6070:H1=ADAT :GOB 6010: 7$( 7+2* ( I-P_C) : 8+2*( I-PJC) )=H1$ 
3630 GOSUB 6290 : Y$( 17+I-P_C ) ^CHFADAT) 
3640 NEXT I 

3650 ON NY GOTO 3670,3660 
3660 LPRINT 7$ 

3670 PRINT 7$( : 5)&V$(7: 15)&7$(2? ; 2) 

3680 PC=PC+ 1 : GOSUB 6160 

3690 RETURN 

3700 MOD=H : GOSUB 6230 

3710 GOSUB 6340 

3720 H=PC:GOSOB 6030 : V?{ : 4) =W$ 
3730 C1H=PC: GOSUB 6070:W=ADAT 

3740 CIM=PC+1: GOSUB 6070 : W=W+256DAT : GOSUB 6030 : Y* ( 32 : 35 ) =W$ 

3750 V$(27:28)="DH" :P_C=PC:PC=PC : GOSUB 3530 : GOSUB 6330: GOTO 3610 

3760 MOD=H+i:GOS0B 6230 

3770 GOSUB 6310 :X=INT(X) : IF X<1 : ! X> 12 THEN 3770 

3780 PRINT AT 4, 18 : "" ; : PRINT US 3 '99" : X : GOSUB 6340: FOR 1-1 TO X 
3790 CI H=PC+I-1 : GOSUB 6070 : Wl= AT : GOSUB 6010 
3600 7SC6+2*(I-l):7+2*(I-l))=Wlf 
3810 NEXT I 

3820 W=PC: GOSUB 6030 : V$ ( : 4) =W$ : &PC+X : GOSUB 6160 -GOSUB 3530 

3830 GOSUB 6330: ON NY GOTO 385D340 

3840 LPRINT 7$ 

3850 PRINT V$( : 30) : RETURN 

3860 MOD-N+1: GOSUB 6230 

3670 GOSUB 6310 :X~INT(X) -IF X<13 X>24 THEN 3870 
3880 GOSUB 6340: PRINT AT 4 , IB : " : PRINT USING "##":X 
3890 FOB 1=1 TO X 

3900 CIM=PC+I-1 :GOS0B 6070 : GOSUB290 : Vf ( 5+ I ) =CHR$( ADAT ) 
3910 NEXT I: GOSUB 3530 : H=PC * GOS 6030 : 7$ ( : 4) =W$ : PC-FC+X 
3920 ON NY GOTO 3940,3930 
3930 LPRINT V$ 

3940 GOSUB 6330:PRINT 7?(:30) 
3950 GOTO S160 

5000 RESTORE 6000 : FOR 1=1 TO 395AD OP*(I):NEXT I 
5010 D-0: L-0 :A=0: GOSUB 6340 

5020 CIM=PC:GOSUB 6070 : X=ADAT : WC : GOSUB 6030 : V$( : 4 ) =W* 
5030 CIH/=PC+L + 1 : GOSUB 6070 : Hl-AT ; GOSUB 6010 : OP? ( 2 1 ) =W1$ 
5040 OP$<17)(2:3)=OP$(21) 

5050 CIH=PC+1: GOSUB 6070:tf=PC+2DAT+256*( ADAT> 127 ) :GOS0B 6030 

5060 OP*( 19)=W* :CIB=PC+2: GOSUB 70 : H=256*ADAT 

5070 CIM-PC+1: GOSUB 6070 : W=W+AB : GOSUB 6030 : OP*( 20 ) =W$ 

5080 0P$(1B)(2:S)=H* :IF D= 1 THE5330 

5090 ON X/64+1 GOTO 5100,5200,10,5120 

5100 RESTORE 8 100: GOTO 5130 

511C RESTORE 8200: GOTO 5130 

5120 RESTORE 8300 

5130 FOR 1=0 TO X AND 63; READ A: NEXT I 
5140 IF A+B=0 THEN 5230 

5145 RESTORE 8400: IF (X AND 7)=THEN H1-(X AND 56) :GOSDB 6010 : OP* f 17 ) =1 
5150 C-A-35*INT(A/35) :F0R 1=1 TC : READ C$:NEXT I 
5160 C*=C$4STRING$(5-LEN(C$) ,327$ (27:31 )=C* 
5170 C=B-40*INT(B/4Q) : IF C=0 TH RETURN 

5180 X$=OP*(C):C=INT(B/40) :IF CO THEN X$=X$& , "&OP$ (C) 
5190 7$ (32: )=X$&STHING$( 12-LEN(:) ,32) : RETORN 
5200 IF X=118 THEN 7$( 27 : 30)= "ET" : RETURN 

5210 7*(27:28)="LD":X$=OP«((X A 56 ) /8+1 )&" , "&OP$( ( X AND 7)+l) 
5220 A=140;GOTO 5190 
5230 IF X = 237 THEN 5310 
5240 IF X=203 THEN 5470 

5250 IF X=221 THEN OP$(7 ) = " ( IX+) " : OP$( H) = "IX" : 0P$(38)=" ( IX) " 
5260 IF X=253 THEN OP$(7 )=" ( IY+) " : OP$( 11)=" I Y" : OP$( 38)=" ( IY) " 
5270 CIH=PC+2 : GOSUB 6070 :OP$(7 >)=CHR$( 43-2* (ADAT > 127) ) 
5280 H1=(ADAT>127)*256+ADAT:H1^S(H1) : GOSUB 6010 



10. V6gul az osszefesult programokat (programot) ment- 
sulc kazett^ra 

Az dsszefdsult MONI ASSEMBLER hasznAlata: 

Programindft^s ut6n a monitor jelentkezik be. A dis- 
assemble az "a" 6s a RETURN hatSsSra I6phetiink. 
Visszafel6 pedig az "M" billentyQ megnyom6s5val ugor- 
hatunk, ekkor a monitor elolrfll indul. 
Figyelem I 

A Monitor kisbetQs, a D IS ASM pedig nagybetGs uzem- 
m6dban mflkodik. Az egyszerflbb haszn6lhat6s4g 6rdek6- 
ben az 6sszef6sult program a szuksdges 4t6llftfisokat el- 
v6gzi. 



5290 OP$(7) (5:6)=W1$:L=1 : PC=PC+ CIH=PC : GOSUB 6070 
5300 X=ADAT:GOTO 5030 

5310 PC=PC+1 :CIM=PC: GOSUB 6070 "ADAT :D= 1 : L=0 

5320 OP$(ll)="HL":OP?(7)="(HL)-»OTO 5030 

5330 D=0:IF ((X XOR 66) AND 20700 THEN 5350 

5340 7$(27:29)="SBC" : B=37 1+5* (2ND 48)/2:GOTO 5170 

5350 IF ((X XOR 74) AND Z07)<>CHEN 5370 

5360 7$(27 :29)="ADC" : B-371+5*(»ND 48)/2:GOTO 5170 

5370 IF ((X XOR 64) AND 199><>ffHEN 5390 

5380 7$(27:28) = ,, IN" :B=661+(X M 56 )/8 : OP$( 17 )-" (C) " ^GOTO 5170 
5390 IF ((X XOR 65) AND 199)otFHBN 5410 

5400 V$(27:29)="OUT ":B=57+5*(X^D 56) - OP$( 17 ) = " ( C ) " :GOTO 5170 
5410 IF ((X XOR 67) AND 207)oO:HEN 5430 

5420 V?(27:28>="LD" :B=378+5*(XSD 48 ) /2 . PC=PC+2 : GOTO 5170 
5430 IF ((X XOR 75) AND 207 ><> THEN 5450 

5440 7*(27:28)="LD":B=729+(X A: 48)/ 16 :PC=PC+2 :GOTO 5170 
5450 RESTORE 8500 

5460 HEAD C$,C:IF C*X=C*G THEN ?( 27 :) =C$: RETURN : ELSE 5460 
5470 PC=FC+1+L :CIH=PC : GOSUB 60':X=ADAT 
5480 ON X/64+1 GOTO 5490,5500,10,5520 

5490 RESTORE S600:A=1+(X AND 5/6:B=l+(X AND 7):GOTO 5150 
5500 7^(27 : 29)= "BIT" : GOTO 5530 
5510 V»(27:29)='RES " :GOTO 5530 
5520 7$(27 : 29)= SET" 

5530 B=CX AND 56)/8+30+((X ANC )+l )*40 :GOTO 5170 
6000 W2*=CHR*(M2+48-7*(W2>9) ) ::TURN 

6010 W2=INT(W1/16) : GOSUB 6000: $=W2$ : W2=H1- 16*H2: GOSUB 6000 
6020 Wl$=WlS&N2t: RETORN 

6030 H1 = INT( H/256 ) .GOSUB 60 10 :;=W1$ = H1=W-256*H1 : GOSOB 6010 
6040 H$=H$&W1$ : RETURN 
6050 RESTORE 8700:KOD$="" 

6060 FOR 1=1 TO 14 :READ X : RODtOD$&CHR* ( X ) : NEXT I : RETURN 

6070 ClM=CIH+(CIM>32767)*6553e 

6080 ADAT = DSR(2+7ARPTR(XOD*) ,CD - RETURN 

6090 POKE VARPTH (KOD$) +4 , PAG Ih RETURN 

6100 Q2=ORD(Q2$)-48+7*(Q2$>" 9'; RETURN 

6110 Q2$=ttl$( :1) :GOSUB 6100:Q32 :Q2$=Q1? ( Z O :GOS0B 6100 
6120 Q1=16*Q1+Q2 : RETURN 

6130 Q1?=Q$( :2) :GOSUB 61 10 : Q=t Q1$=Q$ ( 3 : ) : GOSOB 6110 
6140 Q=Q*256+Q1: RETURN 

6150 SET INX 2: PRINT AT 6,5: ".-;:SET INK TINTA: PRINT "ddress:" 
6160 W=PC:G0S0B 6030:FRINT AT , 13 :H$: RETORN 

6170 SET INK 2 : PRINT AT 6.20:"; "SET INX TINTA:PHINT 'agina:" 

6180 Hl=PAGING:GOS0B 6010:PRI: AT 6 , 27 : Wl$ : RETURN 

6190 SET INK, 2 ; PRINT AT 7,5:";: SET INK TINTA: PRINT "yomtatd - " ; 

6200 PRINT AT 7,14: '"-ON NY TO 6210,6220 

6210 PRINT "ki": RETURN 

6220 PRINT "be" - RETURN 

6230 PRINT AT 4, 10: ">> " ; 

6240 ON HOD GOTO 6250,6260,62,6260,6260,6270,6280,6280,6320,6320 
6250 PRINT Disaan <<":RETURN 
6260 RETURN 

6270 PRINT " Word <<" ■ RETURN 

62B0 PRINT "Byte < < " : RETURN 

6290 IF ADAT < 32 OR ADAT>159 TIN ADAT=46 

6300 RETORN 

9310 PRINT AT 7 , 19 : " " ; : INPUT ^OHPT " S2 Ana= " : X : GOTO 3560 
6320 PRINT "Text < <" : RETORN 
6330 PRINT AT 23,2: " " ; : RETURK 
6340 7$=STBING$ (45, 32) -RETURN 

8000 DATA B,C.D,E,H,L, (HL) , A ;,DE,HL,SP, AF, CBC) , (DE) , (SP) , (00) , (0000) 

8010 DATA 0000, 0000, 00, NZ , Z . F, C , PO , PE , P , M , 0 , 1,2,3,4,5.8,7, (HL) , HL 

3100 DATA 11,0,71,809,1,334,29,24,1,23,1,36,841,13,0 

8110 DATA 33,533,22,371,1,5683,9,24,2,23,2,36,842,15,0 

8120 DATA 66,19,71,810,1,3351,10,24,3,23,3,36,843,12,0 

8130 DATA 65,19,22,411,1,6083,10,24,4,23,4,36,844,14,0 

8140 DATA 65,782,71,811,71,4^24,11,24,5,23,5,36,645,9,0 

6150 DATA 65, 783, 22, 451, 71,7r,23, 11, 24, 6, 23, 6, 36, 846, 8,0 

8160 DATA 65,784, 71, 812, 71,3:,24, 12, 164, 7, 163,7, 176, 847. 16,0 

8170 DATA 65,765. 22, 491,71. 7:-23, 12, 24, B, 23, 8, 36, 848,7.0 

8200 DATA 22,48,22,88,22,1282,168,22,208,22,248,162,288,22,328 

8210 DATA 27, 48, 27, 88, 27, 1287, 168. 27, 208, 27, 24B, 167, 288, 27, 328 

8220 DATA 20 , 1 , 20, 2 , 20 , 3 , 20 , -20 , 5, 20, 6 , 160, 7 , 20 ,8 

8230 DATA 26 . 48 , 26 , 88 , 26 , 128 S , 168, 26 , 208 , 26, 246 , 166 . 288 , 26, 32B 

824Q DATA 17,1,17,2,17,3,17,17.5,17,6,157,7,17,8 

8250 DATA 21,1,21,2,21,3,21,-21,5,21,6,161,7,21,8 

8260 DATA 19,1.19,2,19,3,19,19,5,19,6,159,7,19,8 

8270 DATA 18,1,18.2.18,3,18,18,5,18,6,158,7,16,8 

8300 DATA 28 , 22, 34 ,9 ,99 , 822 . , 20 , 95 , 822, 10 , 9 , 57 , 849 , 32 , 17 

8310 DATA 28,23,28,0,99,823,0,95,823,95,20,82,848,32,17 

8320 DATA 28,24,34,10.99,8247,337,35,824,10,10,55,21,32,17 

8330 DATA 28,25,6,0,99,825,3688,95,825,0,0,61,848,32,17 

8340 DATA 28,26,34,11,99,8263,456,95,826,10,11,52,21,32,17 

8350 DATA 26,27,29,38,99,827-3,1570,95,327,0.0,56,21,32,17 

8360 DATA 28,28,34,13,99,828,0,95,828,10,13,54,21,32,17 

3370 DATA 28,29,1,452,99,825,0,95,829,0,0,53,21,32,17 

8400 DATA LD.OUT, IN,DI , EI , EX CCF , CPL , DAA , PUSH , NOP , RLA , RLCA 

8410 DATA RRA , HRCA , SCF , AND , C OR, SOB , XOR , ADD , DEC , INC , CALL 

8420 DATA SBC , ADC , RET , JP , JR „ T NZ , RST , EX , POP 

8500 DATA NEG , 68 , RETN , 69 , IHCTO , "LD I , A" ,71 ,RETI , 77 , "LD R , A" 

8510 DATA 79, IM1 , 86, "LD A,' , 87 , IM2 ,94 , "LD A,R",95,RRD 

8520 DATA 103, RLD, 111 , LDI , IfcCPI , 161 , INI , 162 .OUT 1 

8530 DATA 163 , LDD, 168 , CPD, U IND , 170 . OOTD , 17 1 . LDIR , 176 

8540 DATA CPIH, 177 , INIR , 178 TIE, 179 ,LDDR, 184 ,CPIR, 185 

8550 DATA INDR , 186 , OTDR , 187 Not uaed",0 

8600 DATA RLC , RRC , RL , RR , SLA 3A , SLL , SRL 

8700 DATA 243 , 62 , 1 12 , 211 . 2 , 0 , 36 , 0 , 62 . 1 12 ■ 211 . 2 , 251 , 201 




Nyugodtan Ailfthatjuk, hogy a 
PRIMO-tulajdonosok g6pBkkel 
ogyutt sok gondot As bosszfisA* 
got is vfeAroltak. Mfirpedig az 
idei leArtAkelAskor nagyon sok 
gAp talAlt gazdAt. A felhasznAlAi 
kAzikdnyvalapvetS informAciAkat 
sem kozol (pi. memAriatArkAp, 
rendszervAltoz6k) v a ktildn kap- 
hat6 hardver- As szoftverf ilzettel 
a kezdS nehezen boldogul. Ezt az 
IrAsunkat a mAg nam vAjtfUIOek- 
nek frjuk. 

Talfin ma> az Is segftsdg, ha felsoroljuk, 

melyik kortibbi BIT-LET szAmokban 

tal6l a PRIMO-s haszn6lhatd anyagot. 

16-os szflm (1986. Jan.): A PRIMO val- 
latdsa, Karaktercsera 

17: Futkdroztis (jStik), Vallate hozza- 
3z6l6s 

18: Hozzfisz6ltsok 

19: Hozzasz6las 

20: Vastagftott betGk 

22 : Zene-bona, Informed 6k (hang stb.) 

26: N6h6ny rendszervaltoz6 

26: Kulcsszavak billentyOzetrCI 

27: Kulcsszdttiblizat, cfmek 

28: (1986. jan.): A kommunlkacldi te- 
rulet t6rke>e 

30: ft/Ion itorprogram 

31 : Rajz (Manctelbrot-halmazok) 

33: T6rbeli alakzatok rajza 

36: lnformaci6k a gy6rt6t6l, Clrlll be- 
tGk 

38: Kulcsszavak egy billentyGnyomas- 
ra, A kipernya forgatisa, eltoltsa 
(scroll) 
40: (1987. Jan.): Gletjdtdk 
42: Stopper 6rifis szamjegyekkel 
43: Atsorszamozo, Input rutin 

A tovAbbiakban egy olyan kAzAp- 
iskolai tanAr adja kfizre PRIMO-s 
tapasztalatait, akt a HT-1080Z 
utAn ismerte meg ezt a gApat, 
majd a HT-vel, a Spectrummal 
Asszehasonlitva jfitt rA nAhAny 
fogdsra, megoldAsra. 
1. A HT-s elton6nyek sokat segftet- 
tek - tanAcsolom a kezdG PRIMO- 
soknak, hogy olvassanak HT-doku- 
ment£ci6t, BASIC-kfeikonyvet: sok 
a hasonlds^g. Kev6s elt6r6s van a 
nyelvben (BEEP, CALL CLOSE, 
CREATE, OPEN, PI, RESTORE n. 



RESUME n, RESUME NEXT, SAVE 
SCREEN. TEST), nagyon hasonlft a 
merh6riat6rk6p, a rendszerv3ltoz6k cf- 
rne, hasznS fata, a program, a v£ltoz6k 
fe a torn bo k tSrol&sa, a stringek keze- 
Ifise, a sz£m£hr£zol£s* a pontossfig. 
2. A t&jGkozid^sban, kOlonosen pedig 
a g6pi ktidti k£perny6k©zelGs rneg£rt£- 
s£bsn nyOjthat segttsGget a PRIMO 
RAM-jSnak vSzlatos t£rkGpe, megje- 
jolve nihSny fontos dmet amelyen 
inform3ci6t kephatunk vagy beavat- 
kozhatunk (T. fibra). Az adatok c£f- 
szerfl megv£ftoztatas£val £t lehet he- 
lyezni a BASfC-program kezdetdt a 
felhasznalhatri terulet v4g6t (helyfog- 
lalas g§pi k6dd programnakj. a kGp- 
emyfimemtiria kezdetfit A tobbi elm 
inkSbb informal, 6nk6nyes megvaltoz- 
tatasuk zavart okozhat! 
A beavatkozSsnak term§szetesen sza- 
balyai vannak. P6ldaul a BASIC Sltal 
el£rhet<5 terulet felsfi hataranak athe- 
lyezese utan fontos egy CLEAR n 
utasftSs, amely beallft tobb fontos 
rendszervaltoz6t. A programkezdet a*t- 
helyezese utSn pedig az tij cfm elfitti 
byte-ra egy nulfAt kell tolteni, majd 
NEW parancsot adnl A hefyfoglalSson 
kfvuf ilyen fog&sokkat oldhatd meg 
tobb program egyesfte^e vagy egGszen 
kiifonleges me m 6ri a£the I y ez6s e k (pi, 
Otlet. 1985, aug. 29. - „Mem6ria- 
bfivft^s*")- 

3. A HT-hasznSI6k ismerfiskent udvo- 
zdlhett6k a PRIMO nagyon praktikus 
DEF utasftisait (Kfeikonyv, 40- 
42.). £rdemes hasznilni 6ket f sok bil- 
lentyflnyomast lehet megtakarltani, 
esetenkSnt gyorsabb programfutSst 
maskor nagyobb pontossagot 6rve 
el. 

4. Ha PRIM0-felhasznal6 g6pi k6d- 
ban szeretne programozni, elfiszor 



meg kell ismernie a Z 80 mikropro- 
cesszor utasftasait. A gyakorlati kivi- 
telezfenek azt£n g6pt6l fuggfi probl6- 
mai lesznek, p6ldaul a g6pi k6d»i 
programr6sz elhelyez^se a mem6ria- 
ban. Ennek PRIMO-s lehetCs^gei; 

a) A legmkabb ajanlhat6 m6dszer a 
BASIC- terulet v6g6n, a k^pemyfime* 
mdrfa elfirt val6 efhelyezfe. flyen 
meg o I dis l^thati az 1, programban. 
A legfontosabb el6ny az. hogy prog- 
ramb6l oldhatrj meg. is a lefoglalt 
terulet nagy iehet 

b) Helyet foglalhatunk a BASIC- 
program el<5tt is, de ez koriilmSnye- 
sebb, mert a kezd6cfm ^thelyez6s6t 
programon kfvul, paranccsal kell el- 
v6gezni. 

c) Elterjedt m6dsz@r (a HT-s iroda- 
lomban tatSn T^lsagosan is), hogy a 
BASIC -program elejfri REM sor(ok)- 
ban foglalnak hefyet. Elfinye, hogy a 
programmaS egyutt kimenthetfi, hat- 
rinya viszont az, hogy a gfipi k6dii 
programban ilyenkor nem lehet nulfa. 
A nullfik kizarAsa viszont a program 
atszervez6s6t igSnyli. 

d) J6I el lehet helyezni rovidebb g6pi 
rutinokat a kommunikScibs terulet 
egyes helyein is, megfele!6 korulte- 
kintAssel. 36 osszefuggfi szabad byte 
talalhat6 a 16476-1 651 1-es cfmeken. 
A program futasa kozben szinte min- 
dig szabad a kazettapuffer terulete is 
(256 byte, 17129-17384). A bil- 
lentyupuffer (1 6872-1 71 27) felsfi 
szakaszat is fel lehet hasznalni, ha a 
programban csak rovid inputok van- 
nak. Ugyancsak programot tolthetiink 
a lemezutasftasok terulet^re is 
(1 6722-1 6805), ennek meg az az ara, 
hogy kozben nem frhatjuk be a CMD, 
FIELD stb. utasftasokat. 

A sakktablarajzol6 program g6pi szub- 
rutinjat 6s a tabla 64 byte-os mintaza- 
tat a kazettapuffer tertiletSre toltjuk. 
Ilyenkor nem kell teriiletfoglalas, nem 
kell figyelembe venni az elt$r6 mem6- 
riam6reteket sem. 

B. Az egysz©ru BASIC-programok 
mdkodGs^t nem befoly^sotja az. hogy 
milyen PRIMO-tlpuson hajtjuk v^gre. 
Vannak azenban olyan esetek, ame- 
lyekben nem kozombos a tfpus sem. 
Ha valaki tobb Upust hasznAI egy- 
szerre (p^ldaui az oktatdsban) vagy 
publikatja programjait bizonyos ese- 
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tekben kulon intfakednie kell prog- 
ramjai hordozhat6sfiga 6rdek6ben. 
Mikor fontos a tlpus ismerete. prog- 
rambeli felismer6se. lehetfileg automa- 
tikusan? 

m) Ismemunk k^J a g^p mem6ria- 
rntotft (-32. -48, -64), ha a k<§p- 
emy6mem6na e!6tt akarunk helyet 
foglalnL vagy ha a mQv^et kozvelle- 
nu! a k£pernyfirnem6ri3ra irSnyul 
(POKE vagy annak g£pi megfetelfije). 
Ennek piogrambeli feiismerGse 6$ az 
ezze! va!6 tov£bbi vezGrIGs egyszerfl: 
a ROM 19-20-as cfm6n megtalaljuk 
a k6perny6mem6ria kezd6cfm6t (a 
19-esen 0 van, tehSt e!6g a 20-as 
cfmet olvasni). A program el6k6szft6 
r6sz6ben: MEM = PEEK(20). Tov4bbt 
6sszefugg6sek: a k6perny6 e\s6 byte- 



ja MEM*256; az utols6 MEM* 
256+6143; a BASIC altal hasznSlhat6 
teruletvfige MEM*256-1; k6tbyte- 
os formaban: 255, MEM-1. MindkSt 
szemlSltetfi program felhasznalja ezt, 
ME, ilietve Dl nevfl valtozAval. 

b) Ritkabban van szuks6g arra. hogy 
a program ismerje fel a g£p A- vagy 
B tfpus3t. Osszehasonlftva a kSttfpust 
Ogy IStom. hogy az elt6r6sek csak az 
elt6r6 karakterk6szletb6l ad6dnak: a 
B tfpus n6gy 6kezetes nagybetflvel 
tobbet ismer. 

Mindk6t vdltozatban a 12791-es cf- 
men kezdfidik a karakterek 8-8 byte- 
on tSrolt mint£zata. Ha bSrmilyen ok- 
b6l fel akarjuk hasznSIni ezt a mint^- 
zatot (p6ldSu1 nagyft£sra, Cijraterve- 



z6sre), a n6gy karakternyr eltol6d^st 
Sszre kell vennie a programnak. 
A k6tf6le ROM kozott szamos ponton 
van eitfrfc, de a legjellemzflbb a 
384-es tSrol6 (A:49 - B:50). Ez fratja 
a bejel entkezfekor a 84,1. iltetve 
84 + 2 utols6 jeI6t A 1 3832. 6s a 
13841. clmen pedig 30, ilietve 26 
jelzJ az elsfi karakterkddot (a 13800- 
on a 13804-en 98. ilietve 102 
egtazlti ezt ki 128-ra.) A 1 28-as kdd- 
dal kezdtidG jeMszlet a B tEpuson 
nSggyel kisebb: 147-ig tart cssk. 
A gyakorlatban c^lszerG fgy int£z- 
kedni: TIP=(FEEK(384M9) *4. fgy 
az A-t 0 h a B-t 4 jelzi (n6gy karak- 
terl}- Az inverz szdkoz kSdja (ezt 
rajzokon j6l lehet hasznilni); 228- 
Tip f A 128-as karakter eredeti cfme 



2 R E 11 # A P R 1 M G 1 1 p u b f e I : s fii e r 4 s e * 

3$ REN K tf*** frV,*V***r* VrXKZX fc*'**i-+f* 

4tf REM > > > i A t { p L i s kifratasa < < < 

50 CLSa PRINT* 2,EJ, CHR*(2? PR I MO " CMR$ 
( PEEK ( 384 / - 1 6 ) " - ! " R I GHT* ( BTR$ ( C PEEK ( 2© ) - 1 
04) / 4-1-32 > ,2^ DHR$U8> " tfpLisu gsp vagyok" 
3D BUB 5J0 

6E REM >>> 2, H&Iyfogl e\1 as t?7 byte? «< 
7E RftMT«PEEKC2(3J *2S6rlii PRINT* 5,6, ,: A BAB 
IC-terQlet veges " RA :i RA=RPi--97 5 PRINTS 7,0 
„ "Ln?f oglalDk 97 byle-ob, as t'y hatir ii 11 RA 
t RX=RA/236i! POKE 1656:1., RA-RX'^256, R%s CL- 
EAR SB* GDSUB 3:L# 

S0 REM >>> 3,. AdatfcareSKE a RQ^ban <« 
90 MEM-PEEK ( 2E ) s TP-PEEK « 3B4 ) - 49 s T [ P=*TP^4 
REM ) :: ; 4. Inverz sz6kSz l^p^^s <<< 
PR I NT* 9 0 , "Ra ji.ol ok ei^y Inverz szd^q 

CHR*(22S-TIPi £ BDSUB 5113 
R IE M ') > > '5 u '< a r a S i t s- ^ iri i n t A k ol va^asa : :: < C 
CK ::::: 1 279 1 s PR 1 NT* i I , 0 , 11 Ki I r orr. a ROM - -b 
ec-y karakter ad at alt. . 11 a INPUT "Ms'iyik k 

PR I NT 
F DP OfZJ 



11B 

its 
1225 
130 
□] 

arai::ter adatait ker:i ir ;! G*£ PR I NT s 
140 PE=DK-i- Cmc (C$) -PEEK < 13B32) ) 



TD 7s PK-PEEK (PEf-C) s PRINT 11 ff PKsi s FOR 
H='h TO 2 STEP - 1 it HT=2tWs !<0^32a IF PK AN 
KC=228-TIP 

TAB C 25 H'« 2 ) CH R ( K 0 ) I s N EXT a PR S 
SDBUB 5 IE 
[jj Karakter genera!! as a <<< 
PR I NTs PRINT n 'Tervez®k ket jele 
akkb abM , gor6g psz I ) Jh 

CHfW-PEEK ( 165.61 ) fPEEK ( l ! Pa 
s F'DKE 164159, C\ \~CZ*256 , CXi: CiM^CH 



D HT THEN 
150 PRINT 
NTs NEXT 3 
16® REM 6 
173 PRINT 
t Ce 
1SE 
=CH/ 



rCCHC- 3 27675^6553 6 n ! ::: ' □ I C E C I M , J 4 4 ,56, 16,56, 1 
6 , S56 , :i 2^! is 125, 0 , 6(3 , B4 3 84 ,56,16,16,17 
1913 PRINT f ' " CHR^1285 " ' CHR^(I29) 

h SDSUE 510 

REM »> 7. A kiipernyo keselese <<< 
21 13 S:iM-C-l!i"KL6s X™MEM- :i s V - MEM -i-23 POKE CI 
M , :l 7 , 255 , X , 33 , 255 , Y , i , 32 , 0 , 237 , J B4 , 17 , 255 , 
Y , ; 33 , 22 3 , Y , 1 , 224 , 23 , 237 l; 1 B4 ,17,3, MEM , 33 , 22 
4,X, 1,32,83,237, 1 76,2K-1 
22l3 PRIMTs PR INI 11 
h; ! "a PR INI s PRINT 11 f 
e-f ejesem ! " 

23GH E> V -CALL (DIM) i BEEF 1,1 
rHEN 230 



Most scr Ol 1 DKD 
■« b:l ] 1 en fcydr e b 

IF INKIER *< 



243 >%> S- Az adatok •/ i b*= z ca a. 1 1 i "L a s < 

25(S PUKE 16459, 7+TIP*B 1 53:: PDKE 16561, 2 

55, MEM Is CLEAR 5S^ PR I NT a PRINT l, V e Q e 

"i END 

5 (3 E RE M > > ■ ■ > > > > > y > H a n q j b I z s s < < < < : -' < < < 
5iE FOR Tlj ;L27ii D^RND < 10) b BEEP D#2IS 4 2 

SLB NEXT § RETURN 



20 REM * S A l* ! T A B L A * 

3 £i R E M «• * * t # * ■» * ■* «■ •!<■- 'K- v.- * * * k- «■ ^ * ^ •« ^ ^ * * # 
4(23 DEF I NT A "J s A-253 s B-236 a D i BP "PEEK C 2^ ) 
s K E: F" ^ D I *B D i <: E K E 4 C K! E! 3 2 7 6 7 ) * B ^ B u □ 1-1 1 M 1 7 1 
2 9 s C R D Q C M * 6 a R A P» ! 1 6 4 4 5 

150 FOR TO 6 STEP 2 !• PDKE C!1-H*B , 2), A , 0 , 

A , 0 H A , 0 , A s F0KE Ci^H ( I 1 ) *8 , A 5 2) , A , , A , , A ^ 
s NE>! I 

m POKE CP , 1 7 :I 233 , 66 , 3 D I , 62 , S , 2^5 , 229 , 

1 4 „ S ,26, 2 1 3 ,17, 30 , ^ , 6 , 24 1 :L 9 , 3S , 1 3. 9 , 35] , 1 J 9 
„ 25 , 1 6 , ; 24B 2W? ,19, 1 3; s 32 , 236 , 225 , 35 , 35 , 35 , 2 
41,61 ,32 H 224 

70 PDKEQP + 4i0 ., 224 , D I -4 , 62 , 4 , 24 5 , 62 , 3 2ffl , 6 
, 24 (j 1 7 , ; !^ , 3 ;; 25 ,17, 32 , (2 , 25 ,119, 1 6 , 252 , 24 1,61 
, '<2 , 2:36 , 33 , 24 7 , D I » 1 , 62 , 4 , 245 , 62 ,1,6 , 24 ,17, 
0 , 3 „ 25 , 1 7 v 32 , B , 25 , 1 1 9 , 1 6 , 252 , 24 1,61, S2 , 236 
B(Zt PDKE CP : k90 1; 62 , 255 , 6 ,24,1 7 , 0 , D I , 33 , 224 , D 
I -I-23 «, 1 9 , 1 :!. 9 , 1 9 , ,16, 25K , 20 1 
1 00 REM > :> > •= •= > > j z ol BET-- el < < < < < < < < 

1 1 0 5 $ ^ 1 1 & E 1" 1 1 ii 3 □ B !JB 5 1 B i\ □ R B - ^3 T D 1 4 4 B T 
;:P 48 ,i POK H= ! =0 TO 144 STEP 41 : h FDR 1=3 TO 
G ■+■ 2 3 1! ^ 1 + 2 4 s ! ::r D R J ^ H T 0 M ■ 2 Z ii B E T t J 1; I ) s B 
E:T ( J -i-24 , 1" ) 3 NEXT ii NEX T s NEXT ii NEXT 

120 FDR 1=24 TO 168 STEP 4Bs FDR ^=€5 TO 23 
s E 1 "i" ii ii ! :;: ' ^ E ■ 2 4 !i B E ' ! ' ( E , 0 ) ii B E T ( , 1 ' : ? 1 i: B E T 
(0,E) ;! E5ETC191 ,F) ii NEXT ii NEXT si GDSIJB 6 IS 
200 REM > > > > > > > Raj z ol As PDKE- k al < < ■■: < < < < 

2 1 (3 S ::!> =- ; 1 P □ K E M is G G S U S 510 s: F D B 0 "• □ 1 3 E3T 
EP 6.3 PGR Hsk24 TD 168 StEF* 4Bn PGP S"H TD 
r-r23 1; L: «=!<EH- 1 *32 ii W™KE-i-32* ( 1-24 ? i! FOR J :: =G 

TO G-i-2!! POKE L>J,As POKE h-i-J, Aa NEXT ii MEX 
Tii NEXT:: NEXT 

222i PGR LxsKE TO KE-i-4608 STEP 11:136 « ,; 'DR 
TO 23 b }>i7*32;i PDKE L-Ki: , 128;: PQKE 



1 



PGKE 



? ) > ) 

PQKE 



NEXT e NEXT:; FOR L^KE TO KE-23; 
L , A ii P D K E L - : ■■ 6 1 :l. 2 , Pi u N E: X T i G 0 S U B 1 0 
3 0 0 R E; i-1 > > > > > > R ,a j z o 1 a lis g £ p :L k 6 d d a 1 < •< < < < 
3 jj 0 S * ::,!! ' ' !3 E P I G 0 B U B 5 j. 0 ii C * C ^ L L • G ! :;: ' ) ii B D B L I 
B 6 IE 

32G PRINT* 7,i&,j "V I g e I !l a END 
500 REM (((((((< A;^ £ra 1 ndi tasa > ) ) 
310 CLB s PRINT* 2,35/3$!: BEEP f0, iiS0s 

PR , -2! , i>3 :; 0 ii RETURN 
hm REH (((<<<< A^i; or a /TiE-gal 1 l&^e. ))>)}:'} 
6 i % H !■"' E E K ( I-- R ) a ,3 - E E i< ( R 1 i; B E E P 1 0 0 , 1 0 0 
ii X »= H - ; " J » B ii E F : ' X / 600 0 n E ii X - - E F ::i «■ 6 0 0 G V ™ E ^! / j 
00i; PRINT* 5,33, EP "p&rc:"* PRINT* 7,33, U 
B I NG mp rl | V 

62^1 IF 1NI<EV■::!^^ ,, T ^, THEN CLB ELBE 620 
630 IF I NKEY'^P" 1 R " THEM RETURN ELBE 630 




(amelyet megvSItoztatunk a 16459- 
60-as cfmen, ha mi tervezunk saj£t 
jeleket, de amelyet k6s6bb vissza kell 
ailftanunk): 7+TIP*8, 53. 



segedprogramok 



A lefrtak illusztr^l^s^ra k6t programot 
aj£nlok. Az els<5 sorra bemutatja az 
elt$r6 tfpusu PRIMO-k felismer6s6nek 
kul6nb6z6 fog3sait, gyakorlati atkal- 
maz^sait Ezekre a meg6rt6s utan mis 
otletek 6pfthet<5ek (betflnagyft4$, j4- 
tfikok kfipernyflmozgatSsastb). A 
sodik programot ugyancsak gondofat- 
ebresztflnek szinom, mikozben bemu- 
tatom egy fetadat megold^sinak ha- 
rom kulonbozG szrntjat, rninflsGg^t 
A feladai l4tv4nyos; egfez kGpemyfll 
betoltG sakkt^bta rajza. A program 
b4romfele eszkozze! oldja meg: SET, 
POKE, gSpi kddti szubrutin, Kozben 
mukbdteti 6s olvassa a bels6 6r3t is, 
majd kifrja, mennyi id<5 kellett a rajz- 
hoz, Meggy<5z<5 az elt6r6s! Egy-egy 
rajz ut£n SHIFT+T-vel lehet letorolni 
a k6pet az Ojabb rajzol^st pedig 
SHIFT+R-rel lehet indftani. 
A SET-tel val6 rajzolcis programozcisa 
egyszeru, a munka azonban nagyon 
lassLJ. A k6perny6mem6riSba va!6 koz- 
vetlen beavatkoz^s (POKE) egyszerre 
6 pontot rajzol, kb. otszor gyorsabb. 
Ag6pi k6du munka sebess^ge m6g en- 
nek is csaknem 2000-szerese. 

Fekete Gyorgy 

7300 Koml6. Bocskai u 30. 





HANGADO PLUS/4 ES C 16 



A program rtivid ugyan r do nagyon j6 harighatisokat 
6s dallamokat lehet vale til&rnL FeJ I oh at hasznalnl 
prog ram ok box is, kfser3zen£khez. 

A program atfrja 2 megszakitAsvektort fgy BASIC vez£d6st 
nem ig£nyel + A zene addig sztfl, amsddig a megszakftas- 
vektort vissza nem frjuk. 

A programot $2000- re helyeztem. de termeszetesen mas- 
hova 1$ lehet rakni Ekkor a rnegszaMt^svektort 6rte!em- 
szerflsn 6t kell frni. 

A programot rnonltorban trttatjuk "A" parancs 
segfts&gSvel. 

A program indltdaa monitor b6h G 2000", BASIC- 

b5l SYS2*4096,A S2000-t6I $200D-tgtart6 resz vegzr a 

megszakltasvektor 4tiras4t A tulajdonk£ppeni program 

$2000-tfll $2Q10-ig tart. Ez e&okkenti a $FF11 dm tartal- 

mat, 6s slrnegy az eredeti megszakft^skezelflre. 

A SFF11 cfm a hangvez6rl6 regiszter. E byte bitjeinek je- 

Ient6se: 

87. 0 esetdn a heng idftzft^s n^lkiil, folyamatos 
86- 1 esetdn a 2. hanggener^tor zaj er.gedelyezett 
B5 1 eseten a 2 hanggenerator n^gyszogjsl enged6lye~ 
zett 

B4, 1 eset6n az * . hanggener^tor enged6lyez6H 
B3-B0 hangerG drteke (csak 8-ig hatasos) 
A megszb)al6 hangok magassjgsT SOUND otasdassal 41- 
Kthatjuk be (pi SOUND1 ,200,1 ;SOUND3. 900.1) 

BASIC-vezerles: 

Klkapcsolas: 

POKE DEC("2002").DEC("OE"}:POKE DEC("200r). 
DEC("CE ,, ):SYS2*4096:REM OFF 

Bakapcsolas: 

POKE DEC("2O02")rDEC(' 0D") POKE DECC2Q07"). 
DEC('70"):SYS 2#4098:REM ON 
A programot erdemes kiprdb^lni. mert l^nyegesen jobb 
hanghatfis drhaid e! vele. mint a BASIC SOUND utasft^ss3l. 
Eredmenyes k(s4rletez6st \6 sz6rakozSst kfv4rr 

Htbeiler Zsoft, 9600 S^rv^r, Barl6k B^Ja u\ 5. 
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Werner Rugemer: A Szilfcium- 
v6lgy- Kossuth Konyvkiadd, 216 o.. 
50 Ft. 

(Riportkotet a mikroeiektronikai ipar 
kozpontj6nak mGkod6s6r6L 6let6- 

Vadnai Szabolcs: Commodore 16 
Programoz6i zsebkdnyv - No- 

votrade, 78 o.. 1 98 Ft. 
(A C-1 6 mukod6s6nek 6s kezel6s6nek 
bemutatasa, a C 64-es programoz6i 
zsebkonyvhoz hasonl6, k6zikonyv- 
szeru formaban.) 

Steigers: A robotok 6s a Com- 
modore 64 - DATA BECKER - 
Novotrade, 1 28 o.. 249 Ft. 
(A konyv hasznos tanScsokat nytijt 
ahhoz, hogy C-64-es g6punket ho- 
gyan haszn6lhatjuk kis robotok vez6r- 
I6s6re. ir6nyftasara.) 

Markus Weber: IBM PC 3D- 
graf ika - IWT - Novotrade. 1 84 o., 
380 Ft. 

(Az erfisen matematikai szeml6letfl 
kotet a tfrbefi grafikai atkalmazas 
alapjaiba vezet be,) 

Ahazai mikro8z6mft6g6pes szoft- 
verpiac 6s az IBM szoftver-kfni- 
lat - Sz£minform Gmk, 84 o. 

Az IBM-felhasznal6k bizonyara ha- 
szonnai forgatjak a kotetet. A cfm- 
lapon szerepel. hogy ez a II. szerkesz- 
t6s. kiadasi datumk6nt pedig 1987. 
III. negyed6v - (gy minden arra utal, 
hogy v6gre egy naprak6sz kiadv6nyt 
tarthatunk a kezunkben. Ez a kotet 
egy dologban bizios eiter mrnden 
eddig filtaiunk ^rt^kelt kotertfil. Uztet- 
ben ugyanis nem vasSrolhaid, Kis 
p6[d£nyszamban jetent meQ r 6s csak 
a kiaddndl rendelhet<5. Ara is meglehe- 
tfisen borsos. (mintegy 5500 Ft), mivel 
megjelentetfii tigy gondoltdk, hogy 
akinek telik egy IBM-g6pre, &z mm 
fog garasoskodni egy szoftverkatalb- 
gus mejgv6tel6n6l sem. Igaz ami igaz, 
nem mindenkinek az elveivel egyez- 
tethet6 ossze az a filoz6fia, hogy az 
inform6ci6t annak felhasznal6ja kell. 
hogy megfizesse. Mert az alapgondo- 
lat ugyan vitathatatlan. de bosszantd. 
hogy a felhasznalti k6tszer fizet - egy- 
szer az informaci6k6rt masodszor pe- 
dig, ha a klyftnt programot kivaiasz- 
tofta 6s megrendelte. A szoftver e! 
ad6ja viszont csak kasszfroz. hiszen 
nem j£rult hozzi egy Irtyingget sem 
annak a kiadv^nynak az elk6szti[T6hez, 
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amely pedig ha ugy vesszuk reklimot 
jelent neki. A kiadti gmk-k6pvisel6ivel 
hosszCi vit^t folytattunk errfll. s abb an 
igazat kell nekik adnunk, hogy csak 
fgy biztosfthat6, hogy az informed 6- 
kat 6$S2efog!el6 ceg ne legyen egyik 
prog ram k6szftc5 nek sem iekotefezve. 
E glpeketegy6bk6nt is iltalaban nem 
maganszemSlyek, hanem vAllatatok, 
int6zm6nyek visdroljdk, ahol egy j6 
katal6gus 6ra bdven megt6rulheL ha 
okosan haszna"lj6k fel - 6s ha a kata!6- 
gus valdban a kfvSnt informacibkat 
tartalmazza, A k6rd6s most mar csak 
annyi, hogy van-e igazan 6rtelme 
ennek a befektet6snek, azaz nyujt-e 
ez a kotet annyit hogy egy- egy c6gnek 
megGrje rnegrendelni. megvenni, (A 
kisp6nzG feihasznSl6k szam6ra az6rt 
hadd jegyezziink meg annyit, hogy a 
kotet az Orszagos MOszaki Konyvtar- 
ban hozzaf6rhet<5.) 

Honnan szerezhet m6g valaki e ko- 
teten Mvul inform^ici6t arrbl. hogy 
milyen szoftverek kaphat6k ma Ma- 
gyarorszagon? A KSH-nak volt egy 
kiadvanya m6g 1982-ben, „Hazai 
szoftver-kfnalat" cfmmel. Ezt igyekez- 
tek 6venk6nt megjelen6 kotett6 fej- 
leszteni - de a pr<5balkozas elhalt. 
A staf^tat az LSI ATSZ vette at. 
amely 1984-ben egy, 1985-ben k6t, 
1986-ban pedig Ojra egy katal6gust 
adott ki. Az 1984-es katal6gus altala- 
nos f itt a kiad6 a lehetfl legatfog6bb 
bemutat^sra torekedett. A programok 
ismertet6s6re t6ma szerint kerult sor # 
6s bekerult ABC 80 programtdl a 
TPA-n futtathat6ig minden. Ez nem 
a szerkesztfi vagy a kiad6 hib^ja. 
Pusztan arrdl van sz6, hogy 1 984-ben 
az dsszes, Magyarorsz^gon forgalma- 
zott szoftver ismertet^se - barmilyen 
g6pre - betefdrt egyetlen vaskos ko- 
tetbe. 

A kovetkez(5 LSI-kotet 1985-ben m<§g 
ugyanezt a gondolkodSsm6dot ko- 
vette; de ebben az 6vben megjelent az 
a kradvany is, amely mSr csak az 
eg6szs£guggyel, az irodag^pesMssel 
§saz adatfeldolgozassal foglalkozott. 
Vagyis sz3kebb teruleiet olelt fei, de 
Igy k£pes volt a r^szletesebb bemuta- 
t^sra is. Az 1986 -os kotet pedtg m^r 
g6pt(pus szerint speciliza!6dott. Erre 
utal az alcfm is: IBM 6s Commodore 
csalad. 

Mi i^jat nyujthat e kotetekhez k6pest 
a Sz^minform kiadvanya? Sajnos, 
nagyon sokat - 6s nagyon keveset. 



Sokat, mert ez a konyv. 6s a m6s ki- 
ad6k Sltal megjelentetett ■ kor^bbiak 
kozott alig van 6tfed6s. Vagyis egy- 
egy program vagy az egyik konyvben 
szerepel vagy a m£sikban, de csak 
ritk6n mindkettfiben. Ez, persze be- 
tudhat6 annak is. hogy a SzSminform 
igyekezett a legfrissebb informaciAkat 
kozolnL Igy azut^n lehet r hogy keve- 
set is nvtijt; nem hisszuk, hogy minden 
egy-k6t 6ves szoftver annyira elavult 
volna. hogy emi(t6st sem drdemel, 

A Sz^minform kotete m6gis az az 
ismertet6s. ami igyekszik a Iegsz6te- 
sebb kdru lenni. Emiatt tobb olyan 
hib6ba is beleesik, amir6l e rovatban 
mar szdltunk. fgy a kotet java r6sze 
fugge!6k r a programok felsorolasa. 
Ez. persze term6szetes, ha egy kdnyv- 
nek az a c6lja, hogy a hazai szoftver- 
kfnalatot mutassa be - de akkor mi6rt 
kell ezt a fuggel6kben megtenni? 
Furcsa szerkezetQ konyv az, amelynek 
kozel h^romnegyed r6sz6t a fuggel6k 
teszi ki. 

A masik hiba nem csup^in szerkeszt6sL 
de 6rinti a tartalmat is: \6, hogy meg- 
ismerjuk egy-egy program nev6t. de a 
n6vb6l gyakran nem derul ki az, hogy. 
mire is \6 a program. Emiatt jobb az 
LSI kotetek szerkezete: itt minden 
programra raszannak egy-egy oldalt 
6s ismertetik annak c6ljat mukod6s6t 
is. Egy tobbszSz programot felvonul- 
tat6 kiadv4nyt6l persze nem va>hat6 
el ez; de k6rd6s, hogy ha a kotetet 
tobb r6szben, t6m£k szerint csporto- 
sftva, 6s r6szletesebb ismertet6ssel 
egyutt adt6k volna ki, akkor nem 
lenne-e hasznosabb 6s sikeresebb? 

Idaig azonban m6g mindig csak a 
„Fuggel6k"-r6l sz6ltunk - annak el- 
Ien6re, hogy a kotet bevezet6 r6sz6nek 
is sok er6nye van. Ez egy piacszeml6- 
tetCi fejteget6s. ami kit6r arra, hogy 
az elmult 6vekben hogyan alakult az 
IBM-kompatfbilis g6pek kereslete 6s 
kfn6lata, az 6rak 6s a piaci tSj6koz6d6s. 
Mindezen vizsg6latok eredm6nyeit a 
szerzfik tablazatokkal 6s diagrammok- 
kal t5masztj6k ala. Eff6le adatokat a 
kor6bban emlftett mflvek nem tartal- 
maznak. fgy joggal 6llfthatjuk, hogy ez 
az egyetlen konyv, amibfil ilyen - ko- 
r6ntsem haszontalan - inform6ci<Jk 
birtok6ba juthatunk. 

TalUrJdMsef 
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KArjOk Uvtgnf *s ■ Uvtlra 
falragnxtuill B«kflld«si 
hattridS: 1987. nov*mb»r 16, 




Mostani feladatunk nern minden eldzm6ny n^lkuli. Tobb 
mint hdrom 6ve (1984 dprilisdban) 5 g6p nyero p&lydza- 
tunkban kozoltunk egy feladatot, amely tulajdonkdppen en- 
nek a mostaninak a rokona, el0zm6nye, 
Tegyiik fel, hogy van egy jSt6kterunk, amely rnondiuk tizen- 
egy egym&s melletti n6gyzetb6l £11. A rnezfi egyik oldalSn 
ot sotet szinu korong all, a rndsik oldalon szemhen vele 
ot vilSgos szinu. A kozepso mezo tehat ures. Mindezt mu- 
tatja Sbr£nk is. A feladat az, hogy mrnel kevesebb lep£ssel 
cser6ljuk meg a vildgos 6s sot6t korongokat, Term£szetesan 
a tdbldt nam szabad megmozdftani fpdlddul tat£l6konys&gra 
va liana a feladat egyszerQ megoldasa a fdbla elforgatdsd- 
val). A kovetkezo k szerint I6phetijnk: 
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• Egy sdt6t koronggal I6phetunk egyet jobbra, ha az a 
mezo ures. 

• Egy vil£gos koronggal I6phetunk egyet balra, ha az a 
mezS ures. 

• Egy sot6t koronggal dtugorhatjuk a jobb oldalon 6116 
vil£gos korongot, (csak egyet!) ha ennek szomsz6dj£n 
ures mez5 van. 

• Egy vil&gos koronggal atugorhatjuk a bal oldalin 6116 
sot6t korongot, (csak egyet!) ha ennek szomsz6djan ures 
mezS van. 

Roviden ennyi a j&t&k. Eddig 11 mezobof Slid palyarol be- 
sz6(tunk. De termgszetesen bdrmilyen pdratlan szdmu me- 
zo ve I megadhatd a pdlya mfirete, s ennek megfelelden md- 
dosul a korongok szdma. S ennek megfelelden maga a fe- 
ladat: 

Irjanak egy min6l rovidebb 6s szebb BASIC programot, 
amely megk6rdezi N 6rt6k6t. N afapjSn 2ISH-1 m6retCi jdt6k- 
t6rre 6s ennek megfelelden N vrldgos 6s N sot6t korong ra 
etv£gzi a kovetkezoket : 

Meg old ja a jfit6kot, azaz kilrja egynnds ut&n a szuks6ges 
I6p£seket, a k£pernydn pedig mutatja a pillanatnyi dllapotot* 
Term^szetesen a kepemv5 m6rete natdrt szab a megmutat- 
hat6s£gnak. Elegendd ha programjuk N<15-ig| tudja a 
megje(enft6st, s term£szetesen a karaktergrafikat ajSnljuk 
figyelmukbe a program terjedelme miatt is. 
A me girt programokat a szuks6ges magyardzatokkal, leirS- 
sokkaT egyutt ezuttal is papfron k£rjuk bekuldenil 
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